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IDENTIFICATION 


PRODUCT CODE: AC=F141B=MC 

PRODUCT NAME: CJKDBBO DCF11=-AA CPU DIAG 

DATE: JUN-79 

MAINTAINER: DIAGNOSTIC ENGINEERING 

COPYRIGHT (C) 1979 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 
THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE 
ON A_SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION 
OF DEC*S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT 
AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC. 

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR rg agi? Ye OF 
ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC 


SEQ 0001 
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CJKDBB.P11 19=JUN=79 10:52 ~ SEQ 0003 
72 ‘ 
73 
es 1.0 GENERAL INFORMATION 
76 
a ; 1.1 HISTORY: 
79 THIS PROGRAM IS A COMBINED VERSION OF THE THREE BASIC 
80 11/34 DIAGNOSTIC PROGRAMS WITH MODIFICATIONS AND 
81 ENHANCEMENTS MADE TO ACCOUNT FOR THE DIFFERENCES 
Ha BETWEEN THE TWO PROCESSORS. 
e P PROGRAM DESCRIPTION: 
86 THIS PROGRAM CONTAINS THREE PARTS: CPU, TRAP AND 
87 EIS TESTS. IN THE FIRST AND SECOND PARTS, THE PROGRAM 
88 WILL HALT ON ERROR. IN PART THREE, EIS TEST, 
89 WHEN AN ERROR IS DETECTED, THE ERROR PC AND ERROR 
90 NUMBER WILL BE TYPED, THEN THE PROGRAM WILL 
91 CONTINUE EXECUTION. 
92 LOOP ON ERROR IS PROVIDED BY MANUALLY MODIFYING 
93 SOME APPROPRIATE MEMORY LOCATIONS. SEE THE LISTING 
oe OF THAT TEST FOR DETAILS AND INSTRUCTIONS. 
3 wae = ASSUMES SOME OPTIONS (FOR EIS TEST ONLY), 
HEY 
= 4 1. ENABLE ERROR PRINTOUTS, 2.CONTINUE EXECUTION ON ERROR. 
100 
101 1.35 ABSTRACT 
Mee ay ee pe ee 
103 
Ho: PART ONE 
106 CPU TEST, THIS IS THE FIRST PART OF THE MAIN PROGRAM. 
107 THIS TEST CHECK OUT THE BASIC PDP=-11 INSTRUCTIONS IN EVERY 
+ 4 ADDRESSING MODES WITH VARIOUS TYPES OF DATA PATTERNS. 
110 
444 PART TwO: 
113 TRAP TEST, THIS IS THE SECOND PART OF THE MAIN PROGRAM. 
114 THIS IS A TEST OF ALL OPERATIONS AND INSTRUCTIONS THAT CAUSE 
115 TRAPS. ALSO TESTED ARE TRAP OVERFLOW CONDITIONS, 
116 ODDITIES OF mi ty 6, INTERRUPTS , THE vig AND WAIT 
117 INSTRUCTIONS. THIS PROGRAM CHECKS THAT ON A 
118 OPERATIONS REGISTER 6 IS DECREMENTED THE CORRECT A AMOUNT , 
119 THAT THE CORRECT PC IS SAVED ON THE STACK, THAT THE OLD 
120 CONDITION CODES AND PRIORITY ARE PLACED ON THE STACK AND 
121 THAT THE NEW STATUS AND CONDITION CODES ARE CORRECT. 
122 BOTH THE ‘TRAP’ AND ‘‘EMT’* TRAP INSTRUCTIONS ARE TESTED 
123 TO SEE THAT ALL COMBINATIONS WILL TRAP. CHECKED ALSO 
124 IS THAT ALL RESERVED INSTRUCTIONS wit TRAP. THE TRACE BIT 
125 IS CHECKED TO SEE IF IT CAUSES AT 
126 THE RTI AND RTT INSTRUCTIONS ARE CHECKED. STACK OVERFLOW IS 
127 ALSO CHECKED FOR ALL THE TRAP INSTRUCTIONS. 
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SPECIAL CHECKS ARE MADE TO SEE IF BUS 

ERROR TRAPS OCCUR ON NON-EXISTENT MEMORY. 

ALL INSTRUCTIONS THAT ARE RESERVED SHOULD TRAP TO LOCATION 10, 
AND THE PC THAT POINTS TO THE TRAPPING INSTRUCTION 

SHOULD BE PLACED ON THE STACK. 


PART THREE: 


THIS PROGRAM TESTS THE EXTENDED INSTRUCTION SET 

<ASH, ASHC, MUL, AND DIV> USING REGISTERS 0-5 AT LEAST 

ONCE WITH EACH INSTRUCTION. 

THIS PROGRAM TESTS ALL THE EIS INSTRUCTIONS OF THE 11/34 

FOR ASH AND ASHC INSTRUCTIONS EVERY EVEN PASS IS EXECUTED 
WITH DESTINATION MODE 0 FOR ALL REGISTERS AND EVERY ODD PASS 
WITH DESTINATION MODE OF 67. THE DIAGNOSTIC DOES NOT MAKE A 
PASS WITH T BIT SET. 


ee ee ee ee 
SB BWANA 


HARDWARE REQUIREMENT 


A PROCESSOR WITH DCF11-AA CHIP SET, A MINIMUN OF 16K OF 
MEMORY AND A CONSOLE TERMINAL. IF PROGRAM IS RUNNING 
UNDER APT OR ACT, THE CONSOLE TERMINAL IS NOT NECESSARY. 


RELATED DOCUMENTS AND STANDARDS: 
ACT11/XXDP_ PROGRAMMING SPECIFICATION 
STANDARD APT SYSTEM TO A PDP11 DIAGNOSTIC INTERFACE 


PDP11 MAINDEC SYSMAC PACKAGE 
KDF11=A MODULE SPECIFICATION 


STARTING PROCEDURES 


THE PROGRAM IS STARTED BY LOADING ADDRESS 200. 
THE RESTART ADDRESS IS 1 

PROGRAM IDENTIFICATION WILL BE TYPED AFTER THE FIRST 
PASS OF THE WHOLE PROGRAM. 


TRAPCATCHER ABSTRACTS 


THIS IS A SERIES OF INSTRUCTIONS DESIGNED TO DETECT AND 
ISOLATE UNEXPECTED TRAPS AND INTERRUPTS, THAT OCCUR IN THE 
TRAP AND INTERRUPT VECTOR AREA OF MEMORY. 


THE PRINCIPLE OF THIS ROUTINE IS: THE VECTOR ENTRANCE 
ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH WILL CON- 
TAIN A HALT (000000) (THIS LOCATION IS ALSO THE STATUS 
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WORD FOR THAT VECTOR ENTRANCE. BUT THIS WILL HAVE NO EFFECT 
ON IT ALSO BEING THE NEXT INSTRUCTION). 


IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, 
REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CONTENTS, 
THEN USE REGISTER SIX CONTENTS AS AN ADDRESS TO DETERMINE 
WHERE THE aarks a WAS. WHEN THE INTERRUPT OR 

TRAP OCCURRED; MEMORY AS SPECIFIED BY R6 CONTAINS THE 

PC OF THE INSTRUCTION FOLLOWING THE INSTRUCTION WHERE THE 
TRAP OCCURRED. 

THE CONTENTS OF LOCATION ‘$TESTN'(304) CONTAINS 

a ML TY NUMBER THAT IT WAS DOING BEFORE IT 


6.1 ERROR HANDLING IN PART ONE AND PART TWO 


IN PARTS ONE AND TWO, ALL ERRORS WILL CAUSE A HALT. 


THE PROGRAM CHECKS TC SEE THAT THE PC. DOESN'T JUMP ERRATICALLY 
WITHIN THE TESTS BY USING A SEQUENCE COUNT CALLED ‘$TESTN’. 


INC (R2) : INCREMENT THE TEST NUMBER 
CMP #A,(R2) ;COMPARE FOR THE RIGHT TEST 
BNE TSTA+1-10 :1F NOT CORRECT BRANCH TO A HALT 


* R2 CONTAINS THE ADDRESS OF _— (304). 
A IS THE CURRENT TEST NUMBER 


IF AN ERROR IS DETECTED, THE PROGRAM WILL HALT 
IT COULD BE BECAUSE OF TWO REASONS. 

A) WRONG TEST NUMBER (SEQUENCE ERROR) 

B) ERROR IN THE PRESENT TEST. 


THE TEST SEQUENCE COUNT '‘TESTN'' SHOULD BE CHECKED FIRST 
TO SEE IF IT MATCHES _ THE PRESENT TEST. 


IF IT DOESN'T MATCH ; THEN THE CONTENTS OF THIS LOCATION 
TELL YOU WHICH TEST iT WAS DOING BEFORE IT HALTED. 


6.2 ERROR HANDLING IN PART THREE 


IN PART THREE, ANY ERROR, INCLUDES SEQUENCE CHECK ERROR WILL 
CAUSE THE ERROR MESSAGE TO BE TYPED. THE PROGRAM WILL 
CONTINUE EXECUTION AFTER TYPE OUT. 

THE ERROR REPORTING FORMAT IS AS FOLLOWS: 


ERROR! PC AND ERROR # ARE: 
PC # 
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ERROR # 


7.0 SWITCH SETTINGS (APPLICABLE ONLY TO PART THREE). 


SINCE NO HARDWARE SWITCH tants ae IS AVAILABLE, THE PROGRAM 
AUTOMATICALLY USES THE CONTENTS OF LOC. 176 AS THE SOFTWARE 
SWITCH REGISTER. THE INITIAL CONTENT OF LOC. 176 IS 000000, 
THE USER MAY PRE-SET THIS LOCATION BEFORE 

STARTING THE PROGRAM. 


BIT # OCTAL VALUE FUNCTION 


15 100000 HALT ON ERR 
13 020000 INHIBIT ERROR PRINTOUT 


ALSO, WITHIN THE APT TABLE, AN 8 BIT BYTE $SENVM [LOCATION 321] 
HAS BEEN USED TO DEFINE THE OPERATING MODE. ALL TYPEOUTS 

CAN BE SUPPRESSED BY MAKING BIT 5 OF BYTE SENVM HIGH, 

IN OTHER WORDS BY PLACING A 20000 IN LOCATION 320. 


EXECUTION TIMES 


THE RUN TIME FOR A SINGLE RUN (THE FIRST PASS) IS ONE 
SECOND. 


AFTER THE FIRST PASS, THE PROGRAM WILL ITERATE ty 15 
TIMES BEFORE THE END OF PASS MESSAGE IS TYPED AGAIN 

THE RUN TIME FOR EACH ADDITIONAL END OF PASS MESSAGE 
TYPED IS APPROXIMATELY 15 SECONDS. 


ROUTINES ABSTRACT 


THIS ROUTINE IS CALLED VIA A JSR INSTRUCTION EACH TIME 
AN ERROR IS SEEN AND AN ERROR MESSAGE IS THEN TYPED OUT 
UNLESS IT IS SUPRESSED BY THE SWITCHES. 

THE COMMENTS BESIDE THE CALL TO THE HALT SUBROUTINE 
TELLS WHAT WAS BEING TESTED AND WHAT WAS EXPECTED. ALL 
PRINTOUTS WILL BE SUPPRESSED WHEN BIT 5 OF LOCATION 
SENVM IS HIGH, 

WHILE RUNNING UNDER APT THE DIAGNOSTIC WILL NOT 

SUPPORT SPOOLING OF CONSOLE OUTPUTS. 


POWER FAIL ROUTINE 
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IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP), THE 
MESSAGE ‘POWER FAIL*’ IS TYPED OUT AND THE PROGRAM WILL 
RESTART EXECUTION AT ‘RESTRT''. 
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;PROGRAMMER: KIN C. LEE 
TITLE CJKDB=B DCF11=AA CPU DIAG. 
- ENABL 
»NLIST CND,MC,MD 
ME 
000240 
000007 


WWWNWNWNWWNVIW WWW 
WOON AULSWN-— 0 COON 


PU 
-SBTTL ACT11 HOOKS 


FERRARA REAR RE EEE RARER EERE REE EREEREEREAEEEREEREEEEe 
sHOOKS REQUIRED BY ACT11 
$SVPC= SAVE PC 


321)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 


252)SET LOC. we TO ZERO 
iz RESTORE P 


= 0 
-SBTTL APT MAILBOX-E TABLE 
ibe e eee TTP Pte PPT iC STITT TCI TTT TTI TTC TTT TCT TTT TTT TTT TTT TTT TT 
BOX 


Z7APT MAIL 
:z:MESSAGE TYPE CODE 
2 FATAL — NUMBER 


000000 
000000 


PE 
11/04=01,11/05= yy & 11/20=03,11/40=04,11/45=05 
11/70=06. vos Q=10 


CLO 
=F LOATING POINT SOCESSOR 
=MEMORY MANAGEMEN 
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-SBTTL APT PARAMETER BLOCK 


FREAK EERE EERE EERE EERE REE REE 
[SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
LAER REE EEE REE ERR EREREE EE EEE 

;3SAVE CURRENT LOCATION 

::SET POWER FAIL TO POINT TO START OF PROGRAM 

:3FOR APT START UP 

:POINT TO APT INDIRECT ADDRESS PNTR. 

::POINT TO APT HEADER BLOCK 

;;RESET LOCATION COUNTER 
5 ee eH Be eH i ee HH I I I I IH TI KEKE EE KEEKEK EEK KEKE 
SETUP APT PARAMETER BLOCK AS DEFJNED IN THE APT-PDP11 DIAGNOSTIC 
INTERFACE SPEC. 


$APTHD: 

$HIBTS: . 0 ;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

$MBADR: .WOR : TADDRESS OF APT “oi ere (BITS 0-15) 

$TSTM: ;;RUN TIM OF LONGEST TEST 

$PASTM: _, TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

$SUNITM: 5 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

SETEND-SMAIL/2 : sLENGTH MAILBOX-E TABLE (WORDS) 

DORIC IOI IORI IORI IRA TOA ANA SIA SAS III II AIAN AAAI AAAI IAA IA AAA AAA AAD ACA He 
;SOME POINTERS TO CPU TRAP HANDLERS 


iit te eee ete PPP PPC CCPC CCPC PSCC PC CSCC C CSCC CSCC SSS SSCS SLC CS SS SC CSC e See. 2. 2 2 2 os 


-=172 

LPADR: 0 ;LOOP ADDRESS (EIS TEST) 
DISPREG: 0 SOFTWARE DISPLAY REGISTER 
SWREG: 0 SOFTWARE SWITCH REGISTER 


FI KI KKK KKK RIKER KE EER ERR REE EEEREKEEKE EEE 


[DATA TABLE FOR USE IN ADDRESSING MODE TESTS 


jannneenausesaunnscaneunuussnennnenisnnnsnnnsasacaunnnnsnennvenanenensntensaanenesss 


000370 .=370 
000009 000000 000000 0,0,0,0,0,0 
000376 000000 900000 000000 
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000001 000001 177777 1,1,-1 
ESSE ISIS SISISISISI I OIIIIIIISII UI IOUUDODIUIIDIIIU ODED iit netthentnnes 
:SET UP STARTING ADDRESS 
$SERROR=$FATA 
$TSTNM= STESIN 
=1000 


STBOT: .WORD 0 :STACK POINTER 


000576 } START 
001000 ASTBOT ,R6 7SET STACK POINTER 
000304 ASTESTN,R2 ;SET MAILBOX + 5 ide 
a(PC)+ JUMP TO SUBTEST 
ADDR. OF SUBTEST GOES HERE 


.=1002 
.SBITL **STARTING OF CPU TEST ** 
060716 000024 START: MOV  #PWRDN,a#24 ;SET UP FOR POWER FAIL 
000306 #0, a#SPASS CLEAR PASS COUNT 
062304 M #16.aH#PASSPT = SET PRINT COUNTER 
RESTRT: #STBOT .R6 SINITIALIZE STACK POINTER 
MO #STESTN,R2 SET UP POINTER TO MESSAGE TYPE 
000304 #O.QASTSTNM =: CLEAR TEST NUMBER 
000302 #0;@4SERROR —_: (LEAR ERROR NUMBER 
012737 000000 000300 #O;@#SMSGTY CLEAR MESSAGE TYPE(FOR APT) 
FIO IICIOIOIIOIOR IOI IOI IOI IOI IIT I TORI ASIA ADAI AIA IIA IIA IAI AAI AAAI AAA AAACN AC HH 
TEST 1 CHECK BRANCHES ON Z BIT 
5 I He Re He He i IK TK TI TH THI II OK TTI TIT TKK ERK EEK EER EK ERE 
005212 TS1: INC (R2) UPDATE TEST NUMBER 
000001 CMP #1, (R2) >SEQUENCE ERROR? 
BNE  TS2-10 ;BR TO ERROR HALT ON SEQ ERROR 
ccc ;CLEAR ALL CONDITION CODES 
BEG BRAT SHOULD BRANCH 
BRA2 BAD BRANCH OF 2-BIT 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; BRANCH INSTRUCTION AND 
; REPLACE THE MOVE INSTRUCTION 
; FOLLOWING W/ 774 


012742 000001 ; #1,-(R2) :MOVE TO MAILBOX # teeeeee 1 weeenen 
005242 ~(R2) :SET MSGTYP TO FATAL ERROR 
000000 :SHOULD HAVE BRANCHED: Z=0 


001004 BRA3 


AANAA 
noun i 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 767 

eres 000002 #2,-(R2) sMOVE TO MAILBOX # *eeeeee 2 aeeeKE® 
-(R2) :SET MSGTYP TO FATAL ERROR 


nuuwu 
“unui 
“une 
“uni 


AAAA 


BRA4 
BRAS 


Non = 
NOARWSR 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: BRANCH INSTRUCTION AND 
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; REPLACE THE MOVE INSTRUCTION 
: FOLLOWING W/ 760 


012742 000003 #3,-(R2) ;MOVE TO MAILBOX # «keene 3 xeexeee 
2 -(R2) ;SET MSGTYP TO FATAL ERROR 
SHOULD NOT HAVE BRANCHED HERE ON Z=1 


001404 , TS2 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE ae INSTRUCTION 
: WHICH a eee / 753 
001136 012742 ( #4 ,-(R2) sMOVE TO MAILBOX Sensece 4 ten KRKE 
001142 2 ~(R2) :SET MSGTYP TO FATAL ERROR 
001144 ;SHOULD HAVE BRANCHED ON Z=1 
: OR SEQUENCE ERROR 


FIT HI II II II I ITI I II TT KI II I KK ERK KEKE KEKE KKK 


- SBTTL DATA PATH TESTS 


THE DATA PATH TESTS ARE USED TO VERIFY THAT VARIOUS 
“DATA PATTERNS CAN BE SUCCESSFULLY MOVED THROUGH THE DATA PATHS 
:MOVE AND COMPARE MODE 2,3 INSTRUCTIONS ARE USED TO PASS AND 
;TEST VARIOUS DATA PATTERNS IN THE DATA PATHS. 
THE TEST EXERCISES THE INTERNAL DATA PATHS, AND THE UNIBUS 
DATA TRANSCIEVERS. 
IF THESE TESTS FAIL, EXAMINE THE TARGET LOCATION (LOC. 0) 
[TO SEE WHICH BITS OF THE DATA PATH ARE FAILING. 
FREER ERR KKK KKK EKER KKK KKK KK KR KEK KKK KKK EK KEKE KE 
STEST 2 TEST OF ZEROES IN THE DATA PATH 
cn. te ae oe apnea Wat aa ee 
005212 TS2: (R2) UPD ATE TEST NUMBER 
022712 000002 #2, (R2 > SEQUENCE ERROR? 
001006 TegcnG :BR TO ERROR HALT ON SEQ ERROR 
012737 000000 0000600 #0,a4#0 MOVE ZEROES THRU ADDRESS LINES, DATA 
LINES AND INTERNAL PATHS 
005737 000000 ar SUCCESSFUL? 


001404 TS3 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 771 

012742 090005 #5,-(R2) sMOVE TO MAILBOX # seexxee 5 xeenene 

005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 DATA INCORRECT 
: OR SEQUENCE ERROR 


Baallalaalahabalataladaalebadatabahataleledobebaiodabatabetalalelelod talelohetetalalelelebelelelelelelelelelebeleiolelsielsieieisiotboiesieiteietebeibidaaa 

TEST 3 TEST OF PATTERN 125252 IN DATA PATH 

JID IOIIIIIOIIIOIOISIIIISI SIO IOIOIOISISIIOIOIUIOIOIOIOIOIOIIOICIOIOIOIOI IOI ITO ITT ITI IIIT TI III ROI III III II i i 
005212 TS3: (R2) UPDATE TEST NUMBER 

000003 #3, (R2) ; SEQUENCE ERROR? 
TS4-10 ;BR TO ERROR HALT ON SEQ ERR 

012737 125252 000000 #125252,a#0 apy ne geet ONES AND ZEROES 
022737 125252 000000 #125252, a#0 ; SUCCESSFUL 


AAAA 


MMNMIMANAMAMNUTU) 
Le ee ee ee ee ee ee ee 
SOONANEWH 
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001226 


001256 
001264 


001266 
001272 
001274 
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001404 


012742 
005242 
000000 


05212 
022712 
001007 
012737 


022737 
001404 


012742 
005242 
000000 


005212 
0 


012742 
005242 
000000 


000006 


000004 
052525 
052525 


000007 


000005 


177777 
177777 


000010 


MACY11 Wasa 


000000 
000000 


000000 
000000 
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TEST OF PATTERN 125252 iN DATA PATH 


BEQ 


MOV 
INC 
HALT 


TS4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
é CONDITIONAL BRANCH INST. AND 
2 REPLACE THE MOVE INSTRUCTION 
é WHICH FOLLOWS W/ 770 
#6,-(R2) sMOVE TO MAILBOX # kkKKKRR 6 HeKKKER 
-(R2) ;SET MSGTYP TO FATAL ERROR 
;DATA INCORRECT 
; OR SEQUENCE ERROR 


SEQ C012 


5 I IH I He I HI HI II I TIT ITI II I IOI IT TTI HII HH TI TTI TOT TKK KER EEE EKER EEE 


TEST 4 TEST OF PATTERN 052525 IN DATA PATH 


5 I I IH HK II I I IE IK IC I HH II III II IKI III TTT IT TTI KKK KEE EERE KEE KEK 


TS4: 


INC 


(R2) ;UPDATE TEST NUMBER 
#4, (R2 * SEQUENCE ERROR? 
TS g Re? ;BR TO ERROR HALT ON SEQ ERROR 
#052525, a#0 ;MOVE ALTERNATING ZEROES AND ONES 
‘THRU DATA PATH 
#052525 a0 s SUCCESSFUL? 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 770 
#7,-(R2) [MOVE TO MAILBOX # *kxxexe 7 xeaenee 
-(R2) ‘SET MSGTYP TO FATAL ERROR 


:DATA INCORRECT 
; OR SEQUENCE ERROR 


A AAA 
nuue 
iunwu 


BR II I IKI I HI II IK ITT II III HI III TIKIT IT ITI KEKE KEKE KK 


:TEST 5 TEST OF ALL ONES IN DATA PATH 


BI HK IK II KR KK KKK KKK KEKE EKER EKER KEKE KEK 


TSS: 


INC 


(R2) UPDATE TEST NUMBER 

#5, (R2) SEQUENCE ERROR? 

TS6-10_ ;BR TO ERROR HALT ON SEQ ERROR 
#177777 ,a#0 :MOVE ONES THRU DATA PATH 


eearr ets -a#0 ; SUCCESSFUL 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. 

: REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 770 
#10,-(R2) [MOVE TO MAILBOX # over 10 seeeeee 
-(R2) :SET MSGTYP TG FATAL ERROR 

[DATA INCORRECT 
: OR SEQUENCE ERROR 


FRR RRR EKER REE REE EEK KEE ERE KERR EKER EERE EERE EERE 


- SBTTL B-REGISTER TEST 
THE B-REGISTER a eS 0) SHIFTING LOGIC TESTS ARE USED 


“10 TEST THAT THE B-REGISTER 


AN HOLD VARIOUS DATA PATTERNS AND THAT 


THE ASSOCIATED LOGIC SUPPORTS THE SHIFTING FUNCTIONS WITHIN THE 
:-REGISTER AND C-BIT 


A ONE IS SHIFTED THROUGH EVERY BIT IN THE B-REGISTER AND C-BIT IN 
BOTH DIRECTIONS, 
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001404 


012742 
005242 
000000 


005212 
0 


103014 


012742 
005242 
006000 


022737 
001404 


012742 
005242 
000090 


000006 


000001 
000000 
000002 


000011 


000007 
000000 
000000 


000012 


000001 


000013 
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000000 
000000 


000000 


000000 
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B-REGISTER TEST 


THE B=-REGISTER Aiea IS TESTED IN ITS ABILITY AS A BUFFER AND AS 


iA SHIFT gg SH DATA IS ALSO 


13 


PASSED THROUGH THE DATA PATH AND ALU, 


IF THESE TESTS FAIL, EXAMINE THE TARGET LOCATION (LOC. 0) TO SEE 
WHICH BITS OF THE B-REGISTER MAY BE FAILING. 


DAE II IOI IEE ISIS IIIS ISIIOISI SSIS IOIIIIII IOI SUIIIIIISIII IO Orin it tennes 


STEST 6 SHIFT BIT 0 TO BIT 1 


eter > te. a a a amet mee ia ee 


TS6: INC (R2) ;UPDATE TEST NUMBER 

CMP #6, (R2 * SEQUENCE ERROR? 

BNE + Ta yBR TO ERROR HALT ON SEQ ERROR 

CLC :CLEAR CARRY BIT 

MOV #1,a4#0 ‘LOAD A 1 

ROL a4 [SHIFT LEFT 

CMP #2, 040 SUCCESSFUL 

BEQ TS? 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 765 

MOV #11,-(R2) [MOVE TO MAILBOX # XxkexRe 1] Heennen 

INC -(R2) SET MSGT YP TO FATAL ERROR 

HALT ‘BIT 1 NO 


FA I III IK IKI IE KIKI HII HT ITI II IIIT ITI I IK ITI TH TIT IK TKK KEE KEKE EEE 


TEST 7 SHIFT CARRY INTO BIT 0 


FI RIKI I IIR KK KKK IKK IKI KIRKE EEK EK KEE KR KKK EEK Re 


TS7: INC (R2) ;UPDATE TEST NUMBER 

CMP #7, (R2) SEQUENCE ERROR? 

BNE TS10-10 [BR TO ERROR HALT ON SEQ ERROR 

MOV #0,a40 ZCLEAR LOCATION 

SEC :SET CARRY 

ROL ayo SROTATE CARRY BIT TO BIT 0 

BCC TS10 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 770 

MOV #12,-(R2) [MOVE TO MAILBOX # *exxeKe 12 xeennee 

INC -(R2) :SET MSGTYP TO FATAL ERROR 

HALT [CARRY CLEAR 
: OR SEQUENCE ERROR 

CMP #1,a40 :BIT 0 SET 

BEQ TSi0 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 760 

MOV #13,-(R2) ;MOVE TO MAIL Reexeee 13 teeeens 

INC -(R2) SET MSGTYP. TO FATAL ERROR 

HALT “BIT 0 NOT SET 
: OR SEQUENCE ERROR 

LATER EERE RARER EEE EER EEE ERE ERR ERE EERE ee 
TEST 10 LEFT SHIFT FROM BIT 0 TO C-BIT 


T SET 
OR SEQUENCE ERROR 


AAAA 






SEQ 0013 







CJKDB-B DCF 11=AA CPU _DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


001456 
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000010 


000001 
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000000 


000014 


000011 
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000000 
940000 


000015 


000012 


100000 
177757 
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SHIFT CARRY INTO BIT 0 


SEQ 0014 


g RAAT AREA RARER RAE A AERA EREARERRAAARAKRARAEHERREERETRERREERERH ERE HERRERA eeHRetene 


TS$10: 


SHL : 


SHLE: 


#14,-(R2) 
-(R2) 


‘SET BIT 


sMOVE TO MAILBOX # 


UPDATE TEST NUMBER 
a ERROR? 
BRT ro” HALT ON SEQ ERROR 


434! BIT COUNTER 


CLEAR C-BIT 
Z INCREMENT BIT COUNTER 
7BR TO ERROR HALT IF BIT IS LOST 
SHIFT LEFT ONE POSITION 
7BRANCH IF C=BIT NOT SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS < 
CONDITIONAL BRANCH INST. AND < 
REPLACE THE MOVE INSTRUCTION < 
WHICH FOLLOWS W/ 763 < 


nnn 


akekank 14 kannnen 


;SET MSGTYP TO FATAL ERROR 
LEFT SHIFTING LOGIC FAILED 


OR SEQUENCE ERROR | 


SERA RARERERERRAEREREREEHEREEE REE E EEE 


SHIFT BIT 15 TO BIT 14 

PERE REE R ERR EERE ER ERE ERR REE RE 
;UPDATE TEST NUMBER 

; SEQUENCE ERROR? 

;BR TO ERROR HALT ON SEQ ERROR 


sTEST 11 


S11: INC 


#100000, a#0 


a0 
#40000, a40 
TS12 


#15,-(R2) 
-(R2) 


“MOVE TO MAILBOX # 


; TO SCOPE: fied THE RIGHT BYTE OF THIS 


SET BIT te 

CLEAR CAR 

; SHIFT BIT 15 TO BIT 14 
; SUCCE SSF UL 


ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 
keeeaee 15 
7SET MSGTYP TO FATAL ERROR 
:BIT 14 NOT SET 

OR SEQUENCE ERROR 


“ioiunw 
“wun 


AAAA 


Reeneee 


TERRA AREA ERA RARER EERE REAR ERAARAREEEKERREEEREREREEEEERRRRERRER ERE REE EE 


RIGHT SHIFT FROM BIT 15 TO C-BIT 


OUSTISTSITITICTITOTTITOTITTITTCTTTTTT TE TTC TTT TITTLE TELE TTT TTT TTT Tee 


STEST te 
TS12: 


SHR: 


#100000, a40 
#-21,R0 

RO 

SHRE 

av() 


SHR 
1S13 


;UPDATE TEST NUMBER 

SEQUENCE ERROR? 

BR TO — HALT ON SEQ ERROR 
SET BIT 15 

SET BIT aere 


. CLEAR 
‘INCREMENT BIT COUNTER 


7BR TO ERROR HALT IF BIT IS LOST 
;ROTATE RIGHT ONE POSITION 
:BRANCH IF C-BIT CLEAR 


C @ 
CJKDB=B DCF I1=AA CPU_DIAG. MACY11 304(1052) 19=JUN=79 11:08 PAGE 15 


CJKDBB.P11 19=JUN=79 10:52 T12 RIGHT SHIFT FROM BIT 15 TO CeBIT SEQ 0015 
695 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
696 é CONDITIONAL BRANCH INST. AND <=222 
697 : REPLACE THE MOVE INSTRUCTION <==== 
698 : WHICH FOLLOWS W/ 763 «===- 
699 001632 SHRE : 
700 001632 012742 000016 MOV #16,-(R2) sMOVE TO MAILBOX # *#ennee 16 seeenee 
701 001636 005242 INC -(R2) ‘SET MSGTYP TO FATAL ERROR 
702 001640 000000 HALT ;RIGHT SHIFT LOGIC FAILED 
703 : OR SEQUENCE ERROR 
705 FRA AREA RAEAAAAREEAREEEERARAERAAEAAERAEAEERAEEEERREREREHRREERETRRERRERKRE EKER RARER 
706 -SBITL SCRATCH PAD TESTS 
708 THE SCRATCH PAD TESTS ARE USED TO VERIFY THAT VARIOUS 
709 “DATA PATTERNS CAN BE SUCCESSFULLY HELD IN THE SCRATCH PAD 
710 ;CIRCUITRY. MOVE AND COMPARE INSTRUCTIONS ARE USED TO TEST THAT 
711 [RO CAN HOLD VARIOUS DATA PATTERNS. EACH DATA PATTERN IS 
712 :MOVED AND TESTED IN A SMALL LOOP CONVENIENT FOR SCOPING. THE 
713 ;SUCCESSFUL COMPLETION OF THESE TESTS SHOULD VERIFY THE CIRCUITRY EXTERNAL 
714 :TO THE SCRATCH PAD ITSELF 
715 THE REMAINDER OF THE GENERAL REGISTERS ARE TESTED BY MOVING 
716 “A BIT INTO BIT O OF THE REGISTER AND SHIFTING IT LEFT ONE 
717 [BIT AT A TIME INTO THE CARRY BIT. THE RESULT IS THEN CHECKED TO INSURE THAT 
718 NO BITS WERE PICKED. THE PROCEDURE IS THEN REPEATED UNDER OPPOSITE 
719 ;CONDITIONS. THE GENERAL REGISTER AND THE CARRY BIT ARE SET TO 
720 ZALL ONES, AND A ZERO IS SHIFTED LEFT FROM BIT O INTO THE CARRY BIT. 
721 ; THE RESULT IS THEN CHECKED TO INSURE THAT NO ZEROES WERE PICKED. 
722 AT THIS POINT ALL OF THE GENERAL REGISTERS HAVE BEEN EXERCISED 
723 ZAS WELL AS REGISTER 11. 
725 * Ceheneneanenneraenseneeereereeneeeeneneneceneenenneeeeenseseeesesesesseeeseesesences 
726 STEST 13 TEST IF RO CAN HOLD ALL ZEROES 
fer Pielelielieieteielet ttt ttt tte dete PP PP PP PSPC PCCP CSCS ASAE SOLSCLCLLCLCLOCLCLCCCCCLC. SY 
728 001642 005212 ™S13: ‘INC (R2) ZUPDATE TEST NUMBER 
729 001644 022712 000013 CMP #13, (R2) S SEQUENCE ERROR? 
730 001650 001004 BNE TS14-10 :BR TO ERROR HALT ON SEQ ERROR 
732 001652 012700 000000 MOV #0,R0 :MOVE ZEROES TO RO 
733 001656 005700 TST RO = SUCCESSFUL ? 
734 001660 001404 BEQ 1514 
735 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS  <==== 
736 : CONDITIONAL BRANCH INST. AND  <==== 
737 : REPLACE THE MOVE INSTRUCTION <==== 
738 2 WHICH FOLLOWS W/ 773 <€=s222 
739 001662 012742 000017 MOV #17,-(R2) [MOVE TO MAILBOX # *txanee 17 seeeeee 
740 001666 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
741 001670 000000 HALT *RO NOT 0 
roe : OR SEQUENCE ERROR 
744 ‘ih ee tee e PCP E SE SSE SESE SSS SSCS CCS S CSCS SCSSSCLLSSCCCCLCCCCCO Ce. Cee ees 
745 “TEST 14 TEST IF RO CAN HOLD ONES AND ZEROES 
746 a; ee” fat le aienae eee anaes ee 
747 001672 005212 1S14: INC (R2) ;UPDATE TEST NUMBER 
748 001674 022712 000014 CMP #14, (R2) s SEQUENCE ERROR? 
749 001700 001005 BNE TS15-10 [BR TO ERROR HALT ON SEQ ERROR 


750 001702 012700 125252 MOV #125252,R0 ;MOVE ALTERNATING ONES AND ZEROES TO RO 
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001706 020027 125252 
001712 001404 


012742 
005242 
000000 


000020 


005212 
000015 


052525 
052525 


001746 
001752 
001754 


000021 


000016 


177777 
177777 
001404 


012742 
005242 
00000 


000022 


000017 


000001 
177757 


19=JUN=79 
TEST IF RO CAN HOLD ONES 


CMP RO,4125252 
BEQ TS15 


MACY11 30A(1052) 
114 


#20,-(R2) 
-(R2) 


‘MOVE TO MAIL 
'SET MSGTYP TO FATAL ERROR 


D2 
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AND ZEROES 


; SUCCESSFUL? 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 772 
BOX # kkexeax 20 


RRKKKERE 


:RO NOT 125252 


OR SEQUENCE ERROR 


A AAA 
out ut 
nuudt 


SEQ 0016 


5 IH IH RRR ER KEKE EEK EEE EEE EERE EERE EEK 


TEST 15 


TEST 1F RO CAN HOLD ZEROES AND ONES 


FR I He II I I II TI III I TIT TTT RK EEK EKER KEE REE EE 


TS15: 


#059525, RO 
RC 052525 
TSi6 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

BR TO ERROR HALT ON SEQ ERROR 

= MOVE ALTERNATING ZEROES AND ONES TO RO 
3 SUCCESSFUL? 


; TO SCOPE: eat THE RIGHT BYTE OF THIS 


#21,-(R2) 
-(R2) 


“MOVE TO MAILBOX # 


ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 772 


kktkkee 27] 


:SET MSGTYP_TO FATAL ERROR 


REKRKKK 


:RO NOT 52525 


OR SEQUENCE ERROR 


AAAA 
“fen u 


uuu 
unde 
i 


FI I BH eK IH I I I TTI IKK RTE KKK ERE REE ERE REE REE EERE KERR 


iTEST 16 


TEST IF RO CAN HOLD ALL ONES 


~~: nM a c.. mane ae ae eee 


TS16: 
hoi (R2) 
TS17-10 
nyorr9 RO 
RO, aierere 


#22,-(R2) 
-(R2) 


‘MOVE TO MAIL 
:SET MSGTYP TO FATAL ERROR 
RO NOT 177777 


UPDATE TEST NUMBER 

SEQUENCE ERROR 

BR TO ERROR HALT ON SEQ ERROR 
sMOVE ALL ONES TO RO 

: SUCCESSFUL? 


TO SCOPE: tag THE RIGHT BYTE OF THIS 
ONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 772 

BOX # xxeexxe 220 


REKKKEE 


OR SEQUENCE ERROR 


AAAA 
iuud 
fiw u 
“wouuu 
Huu 


I I I RRR REE REE REE EEE ERE REE EEERE REESE 


;TEST 17 


TEST IF R1 CAN HOLD A ONE IN ALL BITS 


FRR ERK KEKE EKER EERE ERK E EKER EERE ERE ERE REE EEE 


S17: 


#1,R1 
#-21,RO 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

BR TO ERROR HALT ON SEQ ERROR 
:SET BIT 0 

:SET BIT COUNTER 

:CLEAR C-BIT 
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002032 2 REG1: RO ; INCREMENT BIT COUNTER 

0020 8 REGIE :BR TO ERROR HALT IF BIT IS LOST 
R1 ROTATE 1 POSITION 
REG] ;ALL DONE 


TS20 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 


012742 000023 MO #23,-(R2) sMOVE TO MAILBOX # xxxexxe 23 nenenne 
INC -(R2) sSET MSGTYP TO FATAL ERROR 
HALT FAILURE WITH R1 
; OR SEQUENCE ERROR 


JORIS III III IOIIIOIOIOIICIOIOIOIOIOIOIUITITITII II ITT ITT TOTTI TIT IAS AAAASAAAA SAA AAACN NAA AM 
:TEST 20 TEST IF R1 CAN HOLD A ZERO IN ALL BITS 
JOS II IOI III IOIIIOIIIOICIUIOIOIOIOIOIOIOIOI OTT IIIT TAA SII SIS IAISIISIAS AAAI AAA AISIISAANA AA A: 


TS20: R2) UPDATE TEST NUMBER 


000020 
ON SEQ ERROR 
177776 1 7SET ALL ONES IN R1 EXCEPT FOR BIT 0 
177757 ° :SET BIT COUNTER 
7SET C-BIT 
be oo COUNTER 
TO ERROR HALT IF COUNTER=0 
ROTATE 1 POSITION 
CONTINUE UNTIL C-BIT IS CLEAR 
177777 ; 9 CHECK DATA IN Ri 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


000024 #24 ,-(R2) sMOVE TO MAILBOX # xxkxeKe 24 keneKen 
-(R2) ;SET MSGTYP TO FATAL ERROR 
SFAILURE WITH R1 
; OR SEQUENCE ERROR 
JIU IOIOIOIIOIOIOIOIOIOII OIRO IOI TTT AIA IIIS IIASASA IAI IIIS INA AIA AAANINANASIAT AC 
TEST 21 TEST IF R2 CAN HOLD A ONE IN ALL BITS 
JOU IRI III ICICI IOIOIOIOIOIIICIOIOICICICIOIOIOIOIOII TOI IOI IIIISIA AAI AAIINACNAAAA A A 
T$21: (R2) sUPDATE TEST NUMBER 
000021 C ; SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 
past 2 SET 


BIT 
7757 *31° RO SET BIT COUNTER 
:CLEAR C-BIT 
RO fey BIT COUNTER 
REG2A-14 7BR_TO ERROR HALT IF BIT IS LOST 
Re ROTATE 1 POSITION 
sALL DONE 


AAAA 
nnnu 
uuu 


AAAA 
“oun uw 


REG2 
REG2A 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: BRANCH INSTRUCTION AND 
: REPLACE THE MOVE INSTRUCTION 


AAA 
wud 
“wou 
iow 
i 
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863 FOLLOWING W/ 771 <z222 
864 002160 012702 000304 MOV 2 ype R2 "RESTORE 4 pl 
865 002164 012742 000025 MOV 5 ,-(R2) MOVE TO MAILBOX # x#eeexe 25 exeneee 
866 002170 005242 INC #05) “SET MSGTYP TO FATAL ERROR 
867 002172 000000 HALT sFAILURE WITH R2 
868 002174 012702 000304 REG2A: MOV #$TESTN,R2 ;RESTORE POINTER 
870 RII IIT ICSI TOTO TIO TOTO TOOT OIC IOI IOI IOI IAI AAS AAS AASIASISSISISAI ASIII AAAI ANA ANA AAAAN AAA 
871 S TEST 22 TEST IF R2 CAN HOLD A ZERO IN ALL BITS 
872 RTI IAA AAS AAS SIA SAASIASI AAI SII AAACN IAA ANNAN AN HM 
873 002200 005212 S22: INC (R2) ;UPDATE TEST NUMBER 
874 002202 022712 000022 CMP #22, (R2) SEQUENCE ERROR? 
875 002206 001020 BNE TS23-10 7BR TO ERROR HALT ON SEQ ERROR 
876 002210 012702 177776 MOV #-2,R2 ;SET ALL ONES IN R2 EXCEPT FOR BIT O 
877 002214 012700 177757 MOV #-21, RO ;SET BIT COUNTER 
878 002220 000261 SEC ZSET C-BIT 

002222 005200 REG2B: INC RO ; INCREMENT BIT COUNTER 
880 002224 001407 BEQ R2ERR BR TO ERROR HALT IF COUNTER=0 
881 002226 006102 ROL R2 ;ROTATE 1 POSITION 
882 002230 103774 BCS REG2B : CONTINUE UNTIL C-BIT IS CLEAR 
883 002232 022702 177777 CMP #-1,R2 :CHECK DATA IN R2 
884 002236 001406 BEQ REG2C 
885 002240 012702 000304 MOV A$TESTIN,R2 sRESTORE POINTER 
886 002244 R2ERR: 
887 002244 012742 000026 MOV #26,-(R2) sMOVE TO MAILBOX # xxeeene 26 akeenne 
888 002250 005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 
889 002252 000000 HALT sFAILURE WITH R2 
ay 002254 012702 000304 REG2C: MOV #$TESTN,R2 ;RESTORE POINTER 
892 DRI III TI TOTO IOI TOT TFSI IOI IOI ITO IOI IOI IIT TIO IOI IOI OSS IAI AAA IAA IASI AAAI IAIN AAA AIS ASAT HM 
893 sTEST 23 TEST IF R3 CAN HOLD A ONE IN ALL BITS 
894 FRI IOI IIIT IIIT ITO IIIT OI II TOTO I IIIA IAAI IIA III IAI AAI IMAI IAI IIMA AIIM ANAS IIA AN IAN AANA AA 
895 002260 005212 S23: INC (R2) sUPDATE TEST NUMBER 
896 002262 022712 000023 CMP #23, (R2) Ae sy ERROR? 
897 002266 001012 BNE TS24-10 TO — HALT ON SEQ ERROR 
898 002270 012703 000001 MOV #1,R3 eer BIT 0 
899 002274 012700 177757 MOV #=-21,R0 ;SET BIT COUNTER 
900 002300 000241 CLC :CLEAR C-BIT 
901 002302 005200 REG3: INC RO : INCREMENT BIT COUNTER 
902 002304 001403 BEQ REG3E ‘BR TO ERROR HALT IF BIT IS LOST 
903 002306 006103 ROL R3 “ROTATE 1 POSITION 
904 002310 103374 BCC REG3 7ALL DONE 
905 002312 001404 BEQ TS24 
906 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢€s=2= 
907 ; CONDITIONAL BRANCH INST. AND <¢==== 
908 a REPLACE THE MOVE INSTRUCTION <€szzz 
909 WHICH FOLLOWS W/ 765 <==== 
910 002314 REG3E: 
911 002314 012742 000027 MOV #27 ,-(R2) sMOVE TO MAILBOX # xeeenee 27 wenenee 
912 002320 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
913 002322 000000 HALT ZFAILURE WITH R3 
4 ; OR SEQUENCE ERROR 
916 DEER EERE REE REE ERE EEE REE ERR REE ER ERE ee 
917 ZTEST 264 TEST IF R&% CAN HOLD A ZERO IN ALL BITS 
918 FRR ERE RR EERE EER REE RE ERRE ERE EE ER ERR EE ERRE ERE eee eee eee eee ee 


\ 
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002426 


002430 
002430 
002434 
002436 


002440 


002462 


005212 


001404 


012742 
005242 
000000 


005212 


001404 


012742 
005242 
000000 


005212 


005200 


000024 


177776 
177757 


177777 


000030 


000025 


000001 
177757 


000031 


000026 


177776 
177757 
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124 TEST IF R3 CAN HOLD A ZERO IN ALL BITS 


TS24: (R2 UPDATE TEST NUMBER 
C ; SEQUENCE ERROR? 
7BR TO ERROR HALT ON SEQ ERROR 
:SET ALL ONES IN R3 EXCEPT FOR BIT 0 
:SET BIT COUNTER 


:SET C-BIT 
Fg iy BIT COUNTER 

O ERROR HALT IF COUNTER=0 
{ROTATE 1 POSITION 
CONTINUE UNTIL C-BIT IS CLEAR 
:CHECK DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
F REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 763 


430.-(R2) sMOVE TO MAILBOX # keeeeee 30 xttewee 
INC -(R2) :SET MSGTYP TO FATAL ERROR 
HALT FAILURE WITH R3 
: OR SEQUENCE ERROR 


SEQ 0019 


III IOI IIIT OIRO IIIS OI IIIS IIASA ASIA IAI SIII IAA AAA AA IAIAI IAIN AIAN ADAH AA 
TEST 25 TEST IF R& CAN HOLD A ONE IN ALL BITS 
FORO C IORI IOI OI IORI ITAA AA IAI SASSIISI IIIA IIIA II IIA AIAN IAAI ICIIIIAA AN AAA A AH 

TS25: (R2 sUPDATE TEST NUMBER 

SSEQUENCE ERROR? 
7;BR TO i. HALT ON SEQ ERROR 


SET BIT 
#-21,RO :SET BIT COUNTER 
SCLEAR C-BIT 


RO ; INCREMENT BIT COUNTER 

REG4E BR TO ~~ HALT IF BIT IS LOST 
R4 ROTATE 1 POSITION 

REG4 ALL DONE 


TS26 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
5 WHICH FOLLOWS W/ 765 


#31,-(R2) =MOVE TO MAILBOX # «xeeeex 3] xewanne 
-(R2) :SET MSGTYP i FATAL ERROR 

FAILURE WITH R4 

; OR SEQUENCE ERROR 


AAAA 
niuwdu 


FI IR He IIT TI TTT TOTTI RRR REE EEE EERE EKER EERE EERE EEE EEE 


TEST 26 TEST IF R4& CAN HOLD A ZERO IN ALL BITS 


FR KI IKKE EER REE REE EKER EERE EE EEE 


TS26: (R2 UPDATE TEST NUMBER 
s SEQUENCE ERROR? 
7BR TO ERROR HALT ON SEQ ERROR 
;SET ALL ONES IN R4 EXCEPT FOR SIT 0 
#-21, RO :SET BIT COUNTER 


sSéT C-81T 
RO S INCREMENT BIT COUNTER 
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R4 CAN HOLD A ZERO IN ALL BITS 


7;BR_TO ERROR HALT IF COUNTER=0 
ROTATE 1 POSITION 

CONTINUE UNTIL C-BIT IS CLEAR 
CHECK DATA 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS < 
CONDITIONAL BRANCH INST. AND < 
REPLACE THE MOVE INSTRUCTION < 
WHICH FOLLOWS W/ 763 < 


:MOVE TO MAILBOX # *exenxx 32 xunnnnn 
;SET MSGTYP TO FATAL ERROR 
sFAILURE WITH R4 


OR SEQUENCE ERROR 


SEQ 0020 


PUileleleieleieiieieiedtt ttt tbe tee e ete CPT Pe eC PPC CS PC PSC SC CCC CSS SSS CCS SCSoSSLCCC Ce. oS 


TEST IF R5 CAN HOLD A ONE IN ALL BITS 


a tit Gk ue ae ea a ee 


UPDATE TEST NUMBER 


7 SEQUENCE ERROR? 


7BR ‘Ete HALT ON SEQ ERROR 


7 SET 

:SET BIT COUNTER 
CLEAR C-BIT 

: INCREMENT BIT COUNTER 


:BR TO ERROR HALT IF BIT IS LOST 
sROTATE 1 POSITION 
ALL DONE 


Be Be Be Be 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS (==== 
CONDITIONAL BRANCH INST. AND <=== 
REPLACE THE MOVE INSTRUCTION < 
WHICH FOLLOWS W/ 765 < 


sMOVE TO MAILBOX # xeeneee 33 xatknne 


:SET MSGTYP Ly FATAL ERROR 
‘ie ge WITH R5 
OR SEQUENCE ERROR 


FI I IRI III I IC TT OK III IK IIT TTI TT TTT TOTO TOTTI TOT TOTO KEKE EK EEEEKE REE 


TEST IF R5 CAN HOLD A ZERO IN ALL BITS 


SO II KKK KK RRR KKK EEK EEK KE EERE ERE EEE KE EEE 


MACY11 30A(1052) 19=JUN-79 

T26 TEST IF 
BEQ R4ERR 
ROL RG 
BCS REG4A 
CMP #-1,R4 
BEQ TS27 

RGERR: 
MOV #32,-(R2) 
INC -(R2) 
HALT 

sTES! 27 

S27: INC (R2) 
CMP #27,(R2) 
BNE TS30-10 
MOV #1,R5 
MOV #-21,R0 
CLC 

REGS: INC RO 
BEQ REGSE 
ROL R5 
BCC REGS 
BEQ TS30 

REGSE: 
MOV #33,-(R2) 
INC -(R2) 
HAL T 

: TEST 30 

TS30: INC 2) 
CMP #30, (R2) 
BNE $31-10 
MOV #-2,R5 
MOV #-21,R0 
SEC 

REGSA: INC 0 
BEQ RSERR 
ROL 5 
BCS REGSA 
CMP #-1,R5 
BEQ TS31 


UPDATE TEST NUMBER 


: SEQUENCE ERROR? 


R_TO ERROR HALT ON SEQ ERROR 
[SET ALL ONES IN R5 EXCEPT FOR BIT 0 
:SET BIT COUNTER 
:SET C-BIT 
: INCREMENT BIT COUNTER 

TO ERROR HALT IF COUNTER=0 
“ROTATE 1 POSITION 
CONTINUE UNTIL C-BIT IS C;EAR 


:CHECK DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 


i é 
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CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 763 


012742 000034 #34 ,=-(R2) sMOVE TO MAILBOX # «eennne 34 wennnen 
005242 -(R2) ;SET MSGTYP oy FATAL ERROR 
000000 FAILURE WITH R5 

; OR SEQUENCE ERROR 


UII IOI IOI IUIUINIIIIOIOIIIUIUIOIOIUIUIIIIIUOUIUIUUUIIIIUDE htt nt nhnnnennnnints 
STEST 31 TEST IF R6& CAN HOLD A ONE IN ALL BITS 
OOS ISIIIUUIIOI III IUD DE En EEE TEE EERE EERE Eee E Ete 
005212 S31: (R2 ;UPDATE TEST NUMBER 
000031 C ; SEQUENCE ERROR? 
[BR TO ERROR HALT ON SEQ ERROR 
000001 2R6 SET BIT 0 
177757 ° :SET BIT COUNTER 
;CLEAR C-BIT 
: INCREMENT BIT COUNTER 
TO ERROR HALT IF BIT IS LOST 
ZROTATE : POSITION 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


nua 
neunu 
fou tt 
nintut 


AAAA 


WHICH FOLLOWS W/ 765 


012742 000035 #35,-(R2) sMOVE TO MAILBOX # *eeenee 35 wennnee 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 : FAILURE WITH R6 

; OR SEQUENCE ERROR 


FREER REE REE EERE EEK ERE REE REE EEE ERE REE AEREEREEEREEEREEe 
ZTEST 32 TEST IF R6 CAN HOLD A ZERO IN ALL BITS 
FEAR REE REE ERR EEE REE EREREREREEREEREE EERE Eee 
TS32: R2 UPDATE TEST NUMBER 
000032 SEQUENCE ERROR? 
S :BR_TO ERROR HALT ON SEQ ERROR 
177776 SET ALL ONES IN R6 EXCEPT FOR BIT 0 
177757 , ;SET BIT COUNTER 


“SET C-BIT 
: INCREMENT BIT COUNT 
[BR TO ERROR HALT IF COUNTER=0 
SROTATE 1 POSITION 
:CONTINUE UNTIL C-BIT IS CLEAR 
177777 1 =CHECK DATA 


: TO SCOPE: ey THE RIGHT BYTE OF THIS 
: ONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 763 


000036 MO #36,-(R2) sMOVE TO MAILBOX #4 «eeeene 36 eewneee 
-(R2) ‘SET MSGIYP TO FATAL ERROR 
SFAILURE WITH R6 


NAAA 
Wont tt 
i | 
fiw 
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; OR SEQUENCE ERROR 


SAREE REE REE EERE EEE EERE EERE ERE ER EERE EREEEERE ERE TERRE 


-SBTTL PSwW TESTS 


: THE PSW TESTS ARE USED TO VERIFY THAT VARIOUS DATA 
sPATTERNS CAN BE SUCCESSFULLY HELD IN THE PSW AND THAT THE 

sPSwW ADDRESSING LOGIC_IS FUNCTIONING. MOVE AND COMPARE INSTRUCTIONS 
sARE USED TO TEST THAT THE PSW CAN HOLD VARIOUS DATA PATTERNS. 
crates PATTERN IS MOVED AND TESTED IN A SMALL LOOP CONVENIENT FOR 


3 THE PSW REGISTER IS TESTED, THE CC_INPUTS ARE TESTED 
sLATER IN THE MICROCODE TESTS. SETTING OF THE T-BIT BY THE 
TEST PATTERNS IS PURPOSELY AVOIDED. TESTING OF THE 

;T-BIT TRAP CIRCUITRY IS LEFT FOR THE TRAP TEST. 


+ SeeHeeneneneeenaneaeeeneTeeeneeANeeneeneenAARNRenerereneReeeeeeeeeeneeneneseeeneees 
iTEST 33 TEST IF PSW WILL HOLD ZEROES 
oH RH I ee HH HT TI I I IT TIER REEKEREKEKEREEEERKEKEEEKEE 
005212 7S33: (R2) ;UPDATE TEST NUMBER 
000033 (MP #33, (R2) SEQUENCE ERROR? 
TS34-10 ;BR TO ERROR HALT ON SEQ ERROR 
001000 #STBOT -R6 


000000 177776 #0, a4P SET PSwW TO ZERO 
177776 a4PS : SUCCESSFUL 


001404 TS34 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
5 WHICH FCLLOWS wW/ 767 

012742 000037 #37 ,-(R2) sMOVE TO MAILBOX # *xeaeee 37 neeKKeen 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 :PSW NOT 0 
: OR SEQUENCE ERROR 


5 RR i I KKK EERE EKER EERE KEE EKER EEE 


STEST 34 TEST IF PSW WILL HOLD ONES AND ZEROES 
FI I IKK KKK IKK KKK KKK ERK EEK KEE EEKEREKEKE EE 
S34: (R2) ;UPDATE TEST NUMBER 
000034 #34, (R2) S SEQUENCE ERROR? 
BN TS35-10 7BR TO ERROR HALT ON SEQ ERROR 
000252 177776 #252, a4PS [MOVE ALT. ONES AND ZEROES TO PSW 
177776 000252 anes .#252 SUCCESSFUL ? 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
F REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 770 
~(R2) sMOVE TO MAILBOX # *eexeee 40 cannes 
) SET MSGTYP_TO FATAL ERROR 
zPSW NOT 252 
; OR SEQUENCE ERROR 


SEES RESRENE Ts 


oa SS Ss ss SS 


_ _— oO 
MND 23a sessse2eces 
AAAA 


MEWN =O OONAUSWN—O COON 


AAAA 
“wu 


012742 000040 #40 
005242 -(R2 
000000 


SRK EERE EKER KEKE EERE REE EKER KEKE KEKE EER ER EERE REE EEE 


STEST 35 TEST IF PSW (EXCEPT T-BIT) WILL HOLD ZEROES AND ONES 


KR RK RK RRREKRREEEREREEREEERERRRERE ERE EEREEEEEREEE 
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TS35: (R2) UPDATE TEST NUMBER 
000035 CMP ; SEQUENCE ERROR? 
BN T$36-10 BR TO ERROR HALT ON SEQ ERROR 
000105 177776 :MOVE ALT. ONES AND ZEROES TO PSW 
177776 000105 ore ; SUCCESSFUL? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 770 

012742 #41 ,~(R2) sMCVE TO MAILBOX # xexxxee 4] teennes 

~(R2) SET an a TO FATAL ERROR 
:PSwW_NOT 105 
: OR NSEQUENCE ERROR 


FI I I RK KIRK KIER KR KKK EEK EKER EEE KEE EEE KEKE 
TEST 36 TEST IF PSW (EXCEPT T-BIT) WILL HOLD ALL ONES 
FOKKER EEK KK KEE 
7536: (R2) ;UPDATE TEST NUMBER 

000036 SEQUENCE ERROR? 

T BR TO ERROR HALT ON SEQ ERROR 
000357 177776 ;MOVE ONES TO PSW 
177776 000357 a#PS ; SUCCESSFUL 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 770 
012742 000042 #42,-(R2) sMOVE TO MAILBOX # x%xKxKek 42 tekken 
005242 -(R2) #SET MSGTYP_TO FATAL ERROR 
000000 PSW NOT 357 


; OR SEQUENCE ERROR 
-SBTTL CONDITION CODE TEST 


FREE KEE KKK ERK EEEKEE 


THIS TEST CHECKS THE CONDITIONAL BRANCHES INVOLVING THE Z-BIT. 
“THE Z~BIT IS SET WITH ALL OTHER CC BITS ZERO AND BOTH CONDITIONS 
;BEQ AND BNE ARE TESTED FCR PROPER EXECUTION. THEN THE Z-BIT IS 
SET WITH ALL OTHER CC os CLEAR AND BOTH CONDITIONS ARE TESTED 
ZAGAIN 4 > PROPER OPERA 

THIS TEST CHECKS THE OPERATION OF THE SET AND CLEAR CONDITION 

> CODE oy gtd my AND CHECKS THE CIRCUITRY EXTERNAL TO THE CONDITIONAL 
BRANCH ROM. THE BRANCH MICROCODE FOR ALTERING THE PC AND FOR 
sLEAVING THE PC UNALTERED IS TESTED. ONLY THOSE ROM ADDRESSES SPECIFICALLY 
USED IN THE TEST ARE VERIFIED HERE. 


TEES SI SO IISIISIIISIIIDOUUIOI IDE REE EERE EERE EERE RR EEA EERE EERE EEE Eee 
STEST 37 TEST BRANCHES AROUND 7-BIT 
SERRE EERE EERE REE EERE EKER REE EEREEEEEREREEEE REKKKREKEREEKERERE 
005212 1S37: INC (R2) ;UPDATE TEST NUMBER 
022712 000037 CMP #37, (R2) :SEQUENCE ERROR? 
001014 PE TS40-10 ‘BR TO ERROR HALT ON SEQ ERROR 
IRST WITH Z-BIT ON 
003142 000257 CCC 7€C=0100: JUST Z-BIT 
003144 000264 SEZ 


001404 


AAAA 
nuonu 
nun 


RADDA IIIT ES SS SS ES 


001404 
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001001 BNE BRZ1 CHECK OPPOSITE CONDITION 


001404 BEQ BRZ2 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 773 


012742 000043 "mov #43,-(R2) :MOVE TO MAILBOX # texxeee 43 xexeene 
005242 INC -(R3) ‘SET MSGTYP TO FATAL ERROR 
‘IMPROPER BR W/ Z=1 


:C€C=1011: ALL BUT Z-BIT 


AAAA 
fou ow 


HALT 
;CHECK WITH Z-BIT OFF 
SCC 


CLZ 
BEQ BRZ3 
001004 BNE TS40 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


012742 000044 MOV #44 ,-(R2) sMOVE TO MAILBOX # xeKaKKe 44 KaKKH KR 
005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 HALT : IMPROPER BR W/ 

; OR SEQUENCE ERROR 


: Be HD he Fe Te ee Hee He Ke He Ke TH He Ket te TI TK TOI TFC TT TOT TC TTT TOTTI TOTO TOT SOT TOT TOTTI TO TO TOTO et tk tk tk tk 


THIS TEST CHECKS THE CONDITIONAL BRANCHES INVOLVING THE N-BIT. 
“THE N-BIT IS SET WITH ALL OTHER CC BITS ZERO AND BOTH CONDITIONS 
;BMI AND BPL ARE TESTED FOR PROPER EXECUTION. THEN THE N-BIT IS 
+34 WITH ALL OTHER CC BITS CLEAR AND BOTH CONDITIONS ARE TESTED 
; AGAIN 4 PROPER OPERATION. 
THIS TEST CHECKS THE OPERATION OF THE SET AND CLEAR CONDITION 
3 CODE INSTRUCTIONS AND CHECKS THE CIRCUITRY EXTERNAL TO THE CONDITIONAL 
ANCH ROM. THE BRANCH MICROCODE FOR ALTERING THE PC AND FOR 
“LEAVING THE PC UNALTERED IS TESTED. ONLY THOSE ROM ADDRESSES SPECIFICALLY 
;USED IN THE TEST ARE VERIFIED HERE. 


‘ phenndehdebeiiiebiaedneninenmenstbtensecenseaaeenianaiiannsoumenmeniiemmaniededaiio’ 
TEST 40 TEST BRANCHES AROUND N-BIT 
MO gad" peer gar patentee ear + my aia ate enema 
005212 TS40: INC ‘ (R2) sUPDATE TEST NUMBER 
022712 000040 CMP #40, - ; SEQUENCE ERROR? 
001014 BNE T$41-10 :BR TO ERROR HALT ON SEQ ERROR 
sFIRST WITH N-BIT ON 
000257 CCC :CC=1000: JUST N-BIT 


000270 
0000 CHECK QPPOSITE CONDITION 


1 1 

100404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 773 


222 012742 000045 ; #45 ,-(R2) sMOVE TO MAILBOX # xeeneee 45 aeennne 
003226 005242 -(R2) ‘SET MSGTYF TO FATAL ERROR 


NMNONON S@ 26 3 So SS So 
WN OU0OVWOAUSWN oO 
A AAA 
“uuu 
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003230 HALT ; IMPROPER BR W/ N=1 
CHECK WITH N-BIT OFF 
SCC 3CC=0111 


CLN 
BMI BRN3 CHECK OPPOSITE CONDITION 


BPL TS41 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE iNSTRUCTION 
WHICH FOLLOWS W/ 763 


012742 000046 MOV #46,-(R2) sMOVE TO MAILBOX # #eeenee 46 teeeene 
005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
000000 HALT ‘IMPROPER BR W/ N=0 

: OR SEQUENCE ERROR 


g SHRSSS SSAA SHAS ASS ANeeAEseseNgaaaTaTeNgeHasaseaaaaNeeNeseseneeseeeseeeNsessesesesete 


THIS TEST CHECKS THE CONDITIONAL BRANCHES INVOLVING THE V-BIT. 
"THE V=BIT IS SET WITH ALL OTHER CC BITS ZERO AND BOTH CONDITIONS 
;BVS AND BVC ARE TESTED FOR PROPER EXECUTION. THEN THE V-BIT IS 
sSET WITH ALL OTHER CC BITS CLEAR AND BOTH CONDITIONS ARE TESTED 
ZAGAIN FOR PROPER OPERATION. 


{HERRHRERRERRRRRRERRRRERERRRERERRER ERE R REE EERE RRR RRR EREREEARERREREEREREEEeEEEt 
TEST 41 TEST BRANCHES AROUND V-BIT 
BI HI I II IH I HI I TH III HII ICI KIC ICI IC I TOK TCI TTI TOTTI ITE ITER EKER EER EK 
002252 005212 TS41: ;UPDATE TEST NUMBER 
022712 000041 C : SEQUENCE ERROR? 
001014 BN TS42=10 BR TO ERROR HALT ON SEQ ERROR 


sFIRST WITH V-BIT ON 
ccc :CC=0010: JUST V-BIT 
BVC BRV1 CHECK OPPOSITE CONDITION 


102404 BVS BRV2 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 773 


012742 000047 "mov #47,-(R2) sMOVE TO MAILBOX # *keeaee 47 xxeenee 
2 INC -(R2) :SET MSGTYP TO FATAL ERROR 


HAL : IMPROPER BR W/ V=1 
CHECK WITH V-BIT OFF 
SCC :CC=1101: ALL BVT V-BIT 


AAAA 
hunun 


CLV 
BVS BRV3 CHECK OPPOSITE CONDITION 


BVC TS42 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 763 


000050 "mov #50,-(R2) :MOVE TO MAILBOX # kkeneee 50 xeeneee 
INC -(R2) ‘SET MSGTYP TO FATAL ERROR 
HALT S IMPROPER BR W/ V=0 


SERRE PRP P ERE 


w 
= 
oO 
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; OR SEQUENCE ERROR 


FARRER ERE AEE EERE REE REE EERE REE REREEEEREEE REE ERE EEEE EEE EE 


— 
w 
pa 
—_ 


; THEN THE C-BIT IS 
SET WITH ALL OTHER CC BITS CLEAR AND BOTH CONDITIONS ARE TESTED 
ZAGAIN FOR PROPER OPERATION. 


 sdendpenneaaehaeusnnearebiabpeeenebesenbtantibetnnetbdbinsbeandaobnennennnannianne 
STEST 42 TEST BRANCHES AROUND C-BIT 
FREER ERE REE EERE 
003322 005212 TS42: INC (R2) :UPDATE TEST NUMBER 
003324 022712 000042 CMP #42, (R2) : SEQUENCE ERROR 
003330 001014 BNE TS43-10 [BR TO ERROR MALT ON SEQ ERROR 


sFIRST WITH C-BIT ON 
ccc :CC=0001: JUST C-BIT 
CHECK OPPOSITE CONDITION 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 773 


012742 000051 MOV #51,-(R2) sMOVE TO MAILBOX # *xexKee 5] Renee 
005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
000000 HALT ; IMPROPER BR W/ C=1 

;CHECK WITH C-BIT OFF 

SCC 7CC=1110 


CLC 
BCS BRC3 CHECK OPPOSITE CONDITION 


100404 BMI TS43 
:; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 763 


012742 000052 MOV #52,-(R2) 7MOVE TO MAILBOX # *keeKKe 52 neennne 
005242 INC -(R2) 7SET MSGTYP TO FATAL ERROR 
000000 HALT ; IMPROPER BR W/ 

: OR SEQUENCE ERROR 


FIRB HI IT IK TI II I KR III IK RK EEK EEE KEKE ERE EKER EEE EEE 


»SBTTL MICROCODE TESTS 


WWAW WWW 
iis 
CO ODNAUNSWN OO OONOU RWI 


eS es Ss SS as 9 os I SS os ot oS Ls SS 
WN 


WWNWWNWAW 


Ww 
= 


103404 


AAAA 
“nun 
“nunwu 
“wuiud 


1332 
1333 
1334 
1335 
1336 
1337 
1338 
1339 
1340 


AAAA 


: THE TEST IS SET UP USING 
Z ONLY +: Smee AND ADDRESSING MODES wHICH HAVE BEEN PREVIOUSLY 


— et od od od ot eg SS 2 6 2 9 a a td td 
RRRRRERAAARAAAAAARRELELERS 


SESE SERAIAAGAAAARE EERE LERE 
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So ' IF THESE TESTS FAIL, CHECK THE RESULTS FOR A CLUE TO THE 
sFAULT. 


. 
FARRAR REAAARRAEREEE ERR ARERR RRO RRERARRAEAAEERRARA REAR ERAEARERREAEREHERREEREREE EE 


De ee ee 


THE CLR INSTRUCTION IS USED TO INTRODUCE EACH ADDRESSING 
“MODE WITH THE SINGLE OPERAND INSTRUCTION. FOLLOWING THE SEQUENCE CHECK, 
THE CLR_INSTRUCTION IS EXECUTED AND A BRANCH TEST IS EXECUTED WHICH 
ZCHECKS THAT THE Z=BIT WAS PROPERLY SET. THIS TEST CAN CHECK IR DECODE 
[AND MICROCODE FOR SOP INSTRUCTIONS WITH MODE 0. FOLLOWING THIS TEST 
SEVERAL OTHER SOP INSTRUCTIONS ARE INTRODUCED WITH MODE 0. THESE 
; INSTRUCTIONS MAINPULATE DATA AND SERVE TO CHECK THE DATA RESULTS 
OF THE SOP INSTRUCTIONS IN THIS TEST. THE DATA IN THIS TEST IS 
a ON BY EACH INSTRUCTION WITHOUT REINITIALIZING. 


WESTITISITITITITITITTITITITITTIIT TIT ITI TIT TTT TTT TTT TTT TTT TTT TTThTTTTTiiTiT itt 
STEST 43 TEST MODE 0 USING SOP INST. 
RRR ARRREREEERRAAEEAERAAAEAAAERAT AAA AERA R ARERR EERE REET 
005212 1543: 2 ;UPDATE TEST NUMBER 
022712 000043 P ; SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 
TRY THE CLEAR INST. 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 775 

000053 ; ‘ sMOVE TO MAILBOX # *eeenne 53 aaetene 

~(R2) ;SET MSGTYP TO FATAL ERROR 

:CLR DID NOT SET Z-BIT 
; TRY THE INCREMENT INST. 
TRY COMPLEMENT 


SERPSERSSSY 


Rv 2S 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


WANWANAWW 
SR 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 765 
#54,-(R2) sMOVE TO MAILBOX # Lieceur. 54 teeenee 
-(R2) :SET MSGTYP TO FATAL ERROR 
:NEGATE DID NOT SET N-BIT 
TRY COMPLEMENT INST. 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 757 
000055 #55.-(R2) -MOVE TO MAILBOX # weanaee 55 seanene 

-(R2) ‘SET MSGTYP TO FATAL ERROR 
>CUMMULATIVE RESULT OF CLR,INC,NEG AND COM INSTS. FAILED 
: OR SEQUENCE ERROR 


: COM RO 
001404 . B TS44 


“oun 


A AAA 
wie 
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PARA REREAAARAARAEREAAARAEEHERRERAERERAREREREEEREREEEEEEERERE KEKE KER eeneenene 


THIS TEST INTRODUCES THE REMAINING SOP on ao AND TESTS 
THEM IN MODE 0. THE PURPOSE IS TO PROVIDE A BASELINE O 
; INSTRUCTIONS FOR USE IN THE SUBSEQUENT TESTS. SINCE THE MICROCODE FOR 
: THESE INSTRUCTIONS IS IDENTICAL TO THAT ALREADY TESTED, ANY TROUBLE 
: SHOOTING EFFORTS SHOULD BE AIMED AT THE ACTUAL IR DECODE AND ALU 


. 
FERRARA RARER EEE RAEA EERE REERRE KERR E RE RA EE 


STEST 44 TEST REMAINDER OF SOP INSTS IN MODE 0 
FRAAAAARA RARER RR AERARARAEARERERRAEAAEE RARER EERERERERERERERERHRE RE ERR ERE Ee 
1544: (R2) ;UPDATE TEST NUMBER 

#44, (R2) * SEQUENCE ERROR? 

1545-10 ;BR TO ERROR HALT ON SEQ ERROR 

RO * INITIALIZE 

RO : TRY DECREMENT INST. 

SOPOC 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 774 

#56,~-(R2) “MOVE TO MAILBOX # seexene 56 seenene 
(R2) ;SET MSGTYP TO FATAL ERROR 

:N-BIT NOT SET ON DEC 

INITIALIZE CARRY 

TRY ADD CARRY INST 


INITIALIZE CARRY 
TRY SUBTRACT=CARRY INST 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 756 


012742 MOV #57,-(R2) sMOVE TO MAILBOX # seeaeee 57 senenee 

005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 HALT ; CUMMULATIVE RESULT OF ADC,SBC,COM,INC AND DEC INSTS, F 
; OR SEQUENCE ERROR 


RARER AREA AERA ERR AARARAE RARER ERERRERERRERREREHERERO REAR Ree eeeeeese 


now 
nunu 
oi ito 


AAAA 
nun 


: THIS TEST INTRODUCES THE BYTE CONTROL LOGIC OF THE PROCESSOR. 
: THE MODE 0 BYTE MICROCODE IS TESTED. THE METHOD AND SEQUENCE 
: OF TESTING IS THE SAME AS THAT USED IN THE SOP MODE 0 TESTS. 


POTTITITITTIUTITTTTTITITETETTTTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT 


sTEST 45 TEST MODE 0 EVEN BYTE USING SOP INST 


FRA EREEARAERKEREE EERE RETR E ERA Ree eReeReneee 


005212 7S45: INC (R2) UPDATE TEST NUMBER 
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022712 000045 #45, (R2) ; SEQUENCE ERROR? 
001012 1S46-10 BR TO ERROR HALT ON SEQ ERROR 
a : TRY CLEARING EVEN BYTE OF REGISTER 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 775 

012742 000060 MO #60,-(R2) [MOVE TO MAILBOX # txexeex 60 xeneeee 

005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 H. 7CLRB DID NOT SET 7-8IT 

105100 : RO TRY SETTING EVEN BYTE OF REGISTER 

100002 B SOPBOB 

105200 RO TRY INCREMENTING EVEN BYTE OF REGISTER>> 


001404 TS46 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 


012742 000061 #61,-(R2) sMOVE TO MAILBOX # *xeeKRR 6] teeeREE 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 ; TEST CUMMULATIVE RESULT OF ABOVE BYTE INST. 
: OR SEQUENCE ERROR 


CREAR REE ERREEERRREEKEEKEKEEEEREREREERREEEEKKEEREERERE REE ERE ERE EEE EEK EEE 


AAAA 


AAAA 


iuuiu 


THIS TEST USES THE CLR INSTRUCTION TO INTRODUCE AND TEST 
SINGLE OPERAND MODE 1 INSTRUCTIONS. AGAIN, THE CLR INSTRUCTION 
:1S USED TO INTRODUCE THE MICROCODE AND TO TEST THAT THE PROPER 
;CONDITION CODES ARE SET. OTHER SOP INSTRUCTIONS ARE USED TO MANIPULATE 
“Ste DATA TO VERIFY THAT THE CORRECT DATA IS PRODUCED. 


TRRRRERERREERERRE EERE ERE R EERE ERE R ER EERE ERE EERE EERE ER ERR RRR RRR RRR EREREERE EERE 


STEST 46 TEST MODE 1 USING SOP INST. 
te ee. aede iat) MREe GEST AE Oe 
TS46: (R2) ZUPDATE TEST NUMBER 
000046 #46, (R2) : SEQUENCE ERROR? 
1847-10 7BR TO ERROR HALT ON SEQ ERROR 
R s INITIALIZE RO 
(RO) [TRY CLEAR INST W/MODE 1 


SOP1A 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 774 
012742 #62,-(R2) sMOVE TO MAILBOX # xeaneee 62 eennene 
42 -(R2) ;SET MSGTYP TO FATAL ERROR 
:CLR DID NOT SET 2-BIT 
(RO) TRY DECREMENT INST W/MODE 1 


SOP1B 
INITIALIZE CARRY 
(RO) TRY ADD-CARRY W/MODE 1 


TS47 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


S&L 


MAMA AI 


AAAA 
“uuu 
nen 
nundu 


MPN] @ SSS a 
NAUEWN—$SCODNAURWN=O 


Mr nN 
co 


1 
1 
1 
1 
1 
] 
1 
1 
1 
1 
i 
1 
1 
1 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


DADA AAA AIA ADIT ATU 
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é REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 763 


012742 000063 #63,-(R2) sMOVE TO MAILBOX # xexwewe 63 eeeeeen 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

7 TEST CUMMULATIVE RESULT OF ABOVE INST 

: OR SEQUENCE ERROR 


eee 


; THIS TEST VERIFIES THE BYTE INSTRUCTION MICROCODE FOR MODE 1 
: SINGLE Ree INSTRUCTIONS. 
THIS IS THE FIRST PLACE THE SIGN EXTEND LOGIC IS EXERCISED 
; AND VERIFIED. 


ssc sealigieiecaiaersetclamara teeta tcatiadamnpaaieliiedaadilblitelnliliaietadiatilemmeataad 


TEST 47 TEST MODE 1 EVEN BYTE USING SOP INST 
FIR IIOI RICCI OI IORITTITA IIA ISAS ISA SIIS AISI IIIA IAI IIA AI IAI IIA IAI AIA I ASAASACN A 
1847: (R2) UPDATE TEST NUMBER 
000047 ; SEQUENCE ERROR 
TS50-10 :BR TO ERROR HALT ON SEQ ERROR 
INITIALIZE RO 
s INITIALIZE LOC. 0 


TRY TO CLEAR BYTE 0 
; TO SCOPE: See THE RIGHT BYTE OF THIS 


001404 


DITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 772 
012742 000064 F sMOVE TO MAILBOX # k#axKee 64 Keenene 
2 -(R2) SET MSGTYP TO FATAL ERROR 
= CLRB DID NOT SET Z-BIT 
: INCREMENT TO TEST WORD 


:COMPLEMENT: ODD BYTE = 376 
:INC: ODD BYTE = 377 


; INCREMENT ODD BYTE=0 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 757 


012742 000065 MO #65,-(R2) sMOVE TO MAILBOX # keane 65 wxeennne 

005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 HALT ; CHECK CUMMULATIVE RESULT OF ABOVE INST 
; OR SEQUENCE ERROR 


AAAA 


“Huw u 
nnuu 
niu u 
Huu 


001404 


AAAA 
“uun 


SERRE EERE REE RE RKKRRERRERREEEREEEKREREEEKEREEREEREEEERREEREREERER EEE 


THIS TEST VERIFIES THAT SINGLE OPERAND BYTE INSTRUCTIONS WILL 
:FUNCTION CORRECTLY FOR ODD BYTES. 
THIS IS THE FIRST TIME THAT ADDRESS LINE 0 HAS BEEN 








CJKDB=B DCF11=AA CPU_DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


1629 004012 


1645 004014 


005212 
1646 004016 022712 000051 


001404 


012742 
42 


012742 
005242 
000000 


MACY11 30A(1052) 
147 


H 
SOPB1C: DEC 


EXERCISED. 
: THE CONDITION 


19=JUN=79 AGE 31 
TEST MODE 1 EVEN BYTE USING SOP INST 


CHECKS ARE MADE THAT THE PROPER BYTE IS MODIFIED AND 
IT IS ALSO VERIFIED THAT THE UNADDRESSED 


CODES ARE C 
:BYTE 1S NOT ALTERED BY THE INSTRUCTION. 


F 
11:08 


SEQ 0031 


DE EA EIEIO ISISIIISIIIIISISISISIIISISISIINII SSIS III III III IER EEE ERE EERE EERE EEEE 


sTEST 50 


TEST MODE 1 ODD BYTE USING SOP INST 


BI RK KERR KEKE KEE EEK EKER EERE EKER REE EE 


TS50: INC 


SOPB1D: 


V 
INC 
HALT 


: TESTED INSTRUCTIONS ARE USED T 
. - IS INITIALIZED TO -1 BEFORE A CLR MODE E TED. 
THEN RO_IS DECREMENTED BY TWO TO AGAIN POINT TO £00 BEFORE EACH 
20 SEVERAL MODE 2 INSTRUCTIONS ARE USED TO VERIFY THE DATA RESULTS OF 
THIS PROCEDURE ALSO VERIFIES THE PROPER INCREMENTING OF THE 


THE TEST. 


SREGISTER 


o 

DUI OIIUIIIUIIII III IOUUUIIUIIO IUD ER RE RRR EEE EERE EEE R ERE RE EERE REE Eee 
TEST MODE 2 USING SOP INST. 
DOCU OOD ERE EERE EERE RE RRR E REE EERE E EERE Ree ee 
;UPDATE TEST NUMBER 

SEQUENCE ERROR? 


:TEST 51 
1351: INC 
CMP 


(R2) 
#50, (R2) 
TS51-10 
RO 


(RQ) 
(RO) 


#67,-(R2) 
-(R2) 


(R2) 
#51, (R2) 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

BR TO ERROR HALT ON SEQ ERROR 
: INITIALIZE RO 

INITIALIZE LOC. 0 


‘TRY TO CLEAR BYTE 1 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 771 

“MOVE TO MAILBOX # 

:SET MSGTYP TO FATAL ERROR 

:CLRB "eae SET Z-BIT 


: INCREMENT ve” TEST WORD 
TRY. 70 COMPLEMENT BYTE 


| 
www 
fou iat 
iouotu it 


AAAA 


— 


:TRY TO INCREMENT BYTE 1 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 


:MOVE TO MAILBOX # 
;SET MSGTYP TO FATAL ERROR 

2 TEST CUMMULATIVE RESULT OF ABOVE INST. 
; OR SEQUENCE ERROR 


FREER KEE EK KERR EEK REE EEK EEE EEK EEE EEK EKREREREREKERKREK EERE EEE EEE 


THIS TEST VERIFIES ~ ye of SINGLE-OPERAND INSTRUCTIONS. 
O SET A POINTER IN RO TOL eat 
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TS52=10 :BR_TO ERROR HALT ON SEQ ERROR 
RO SET RO=400 


sCLEAR 400 
ZINITIALIZE: 400=-1 
sTRY CLEARING WITH MODE 2 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
3 CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
. WHICH FOLLOWS W/ 770 

000070 . sMOVE TO MAILBOX # *eexeee 70 xeenene 

-(R2) :SET MSCTYP TO FATAL ERROR 
:CLR_ INST DID NOT SET Z2-BIT 
RESET RO 


TRY COMPLEMENTING WITH MODE 2 
sRESET RO 
TRY INCREMENTING WITH MODE 2 


AAAA 
fiuwu 
eee 
weuu 
iin 


001404 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


AAAA 


WHICH FOLLOWS W/ 754 


012742 000071 #71,-(R2) sMOVE TO MAILBOX # %xeexeee 7] teennee 

005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 ;CHECK CUMMULATIVE RESULT OF ABOVE INST 
; OR SEQUENCE ERROR 


FRE KKK KR KK ERR KEKE KEKE EEE REE ERE EERE EERE 


THIS TEST VERIFIES MODE 2 SINGLE OPERAND INSTRUCTIONS WHICH 
“ADDRESS EVEN BYTES. RO IS SET TO 400 AND USED TO INITIALIZE LOCATION 
MODE S -1. CLRB INSTRUCTION IS THEN EXECUTED ON BYTE 400 WITH 


: "RO IS THEN DECREMENTED BEFORE EACH OF SEVERAL MODE 2 INSTRUCT IONS 
WHICH ARE USED TO VERIFY THE DATA RESULTS OF THE TEST. THIS PROCEDURE ALSO 
VERIFIES THE PROPER INCREMENTING OF THE REGISTER. 


s ReRNRERREREEEREREEEEENEEREREERERREEERERERERERRRREREREEREAEARNRRRERREEReNeeneenerenes 
TEST 52 TEST MODE 2 EVEN BYTE USING SOP INST. 
FR KKK ERE ERE KR KEKE EERE EEE REE ERE REE ERE ERE RE REE 
005212 TS52: R2) ;UPDATE TEST NUMBER 
000052 CMP ; SEQUENCE ERROR? 
TS 1 ;BR TO ERROR HALT ON SEQ ERROR 
:SET RO=400 


BERERERE 
Mews oa 


sCLEAR 400 
ZINITIALIZE: 400=-1 
;TRY TO CLEAT 400 W/MODE 2 


2°02 
RR 
—_— 
Rong 
art 


007404 
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CJKDBB.P11 19=JUN=79 10:52 TS2 TEST MODE 2 EVEN BYTE USING SOP INST. SEQ 0033 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS wW/ 770 
012742 000072 #72,-(R2) :MOVE TO MAILBOX # **teeee 72 wennnee 
005242 -(R2) ih OD wor er aire 


00 
zINC 400 TO TEST WORD 
TRY TO INC EVEN BYTE 


RESET RO=400 
;TRY INCREMENT OF EVEN BYTE 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
i WHICH FOLLOWS W/ 754 


012742 000073 MOV #73,-(R2) sMOVE TO MAILBOX # x*eaxee 735 teKeeee 
2 INC -(R2) :SET MSGTYP TO FATAL ERROR 
HALT : TEST CUMMULATIVE RESULT CF ABOVE INST. 
: OR SEQUENCE ERROR 


pK RR IK KKK EREEEEREKEEKEKEE EES 


— et od 2) 2) 2) 


MMM ES SS 


REPRESS EE 


001404 


NNNN NNN NOS 
ON) ce a ad a a ad ad ed ed 


AAAA 
“uuu 
“uuu 


NNNNNNNNN 
NMNNNNNNN 
WDWNAU RW =O OONAU EWR O 


1 
1 
1 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
1 
1 


: THIS TEST FOLLOWS THE SAME PROCEDURE DESCRIBED IN THE PREVIOUS 
oe HERE, THE BYTE INSTRUCTION IS USED TO ADDRESS AN ODD BYTE. 


+ AERA RRRRERERERERERRRREEEEEREREREREREEREREREREERRER ENA EERE RRR RRR EREE EERE EER EEEEEED 
TEST 53 TEST MODE 2 ODD BYTE USING SOP INST. 
DIK RK KKK KKK KERIKERI KK EREKE RK EKER EKER EEE EKER EE EER EEE 
005212 1853: (R2) ;UPDATE TEST NUMBER 
000053 #53, (R2) SEQUENCE ERROR? 
T$54-10 ;BR_TO ERROR HALT ON SEQ ERROR 
0 SET RO=400 


CLEAR LOC 400 

fed h ELF 400=-1 
:RO=ODD BYTE 

7 TRY 10 CLEAR ODD BYTE 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 767 
000074 #74,-(R2) :MOVE TO MAILBOX # xeeexee 74 seennee 
-(R2) zSET MSGTYP TO FATAL ERROR 
;CLRB DID NOT SET 7-BIT 
ny *RO=WORD ADDR. 


; INCREMENT WORD 
R :POINT TO ODD BYTE 
105110 ; COMPLEMENT ODD BYTE 


“uuu 
nu u 


AAAA 





mm. 
CJKDB=B DCF11=AA CPU_DIAG. MACY11 30A(1052) 19=JUN=79 11:08 PAGE 34 


CJKDBB.P11 19=JUN=79 10:52 153 TEST MODE 2 ODD BYTE USING SOP INST. SEQ 0034 
1759 004242 105220 INCB ~~ (RO) + ;TRY TO INCREMENT ODD BYTE 
1760 004244 100003 BPL SOPB2D 
1761 004246 005300 DEC RO :RESET RO TO ODD BYTE 
1762 004250 105220 INCB = (RO) + :TRY TO INCREMENT ODD BYTE 
1763 004252 001404 BEQ TS54 
1764 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
1765 ; CONDITIONAL BRANCH INST. AND <==== 
1766 ; REPLACE THE MOVE INSTRUCTION <==== 
1767 ; 3 WHICH FOLLOWS W/ 751 ¢€==== 
1768 004254 SOPB2D : 
1769 004254 012742 000075 MOV #75,=(R2) zMOVE TO MAILBOX # *eeeeee 75 seeeees 
1770 004260 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
1771 004262 0600000 HALT :TEST CUMMULATIVE RESULT OF ABOVE INST. 
776 : OR SEQUENCE ERROR 
1774 FERRER EERE RRR EREEE REE EERE 
1775 : 
1776 THESE TESTS CHECK THE NEGATE INSTRUCTION IN ALL MODES. PREVIOUSLY 
W707 ; TESTED SINGLE-OPERAND INSTRUCTIONS ARE USED TO TEST THE NEGATE INSTRUCTION. 
1779 FARRAH RRR ERERR RARER EERE EERE ERE EERE REE EERE EEE RRR E EERE eee eeeneee 
1780 TTEST 54 TEST MODE 0 USING NEGATE INSTRUCTION 
1781 FERRER EERE EEE REE REE REE EEE REREEEREAEE EER AERERAEREEEREREEREHEERE REE EEE EEE 
1782 004264 005212 7S54: INC (R2) [UPDATE TEST NUMBER 
1783 004266 022712 000054 CMP #54, (R2) S SEQUENCE ERROR? 
1784 004272 001035 BNE 7S55-10 :BR TO ERROR HALT ON SEQ ERROR 
1785 004274 005000 CLR RO ‘SET RO=0 
1786 004276 005200 INC RO : RO=1 
1787 004300 005400 NEG RO :TRY NEGATE MODE 9: RO=-1 
1788 004302 100003 BPL NEGOO *CC=1001? 
1789 004304 001402 BEQ NEGOO 
1790 004 102401 BVS NEGOO 
1791 004310 103404 BCS NEGO1 
1792 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
1793 : CONDITIONAL BRANCH INST. AND <==== 
1794 ; REPLACE THE MOVE INSTRUCTICN <==== 
1795 ; WHICH FOLLOWS W/ 770 <==2= 
1796 004312 NEGOO: 
1797 004312 012742 000076 MOV #76,-(R2) :MOVE TO MAILBOX # *#xeee 76 eeeeeee 
1798 004316 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
1799 004320 000000 HALT [NEGATE DID NOT SET CC'S CORRECTLY 
1801 004322 005200 NEGO?: INC RO sTEST DATA RESULT 
1802 004324 001404 BEQ NEGO2 
1803 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
1804 : CONDITIONAL BRANCH INST. AND  <==== 
1805 : REPLACE THE MOVE INSTRUCTION <==== 
1806 : WHICH FOLLOWS W/ 762 ¢=== 
1807 004326 012742 000077 MOV #77, -(R2) *MOVE TO MAILBOX # saanewe 77 seenees 
1808 004332 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
1809 004334 000000 HALT [DATA RESULT OF NEGATE INCORRECT 
1811 004336 105100 NEGO2: COMB RO :RO= 377 
1812 004340 105400 NEGB RO =RO=1 
1813 004342 100403 BM] NEGO3 *CC=0001? 
1814 004344 001402 BFQ NEGO3 
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004346 102401 BVS NEGO3 

004350 103404 NEGO4 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS wW/ 750 


012742 000100 MOV #100,=(R2) sMOVE TO MAILBOX # seeeeee 100 *eenene 
005242 -(R2) : SET MSGTYP TO FATAL ERROR 

000000 H, ;NEGB DID NOT SET CC*S CORRECTLY 

0605300 : RO :TEST DATA RESULT 


001404 BE TS55 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 742 
012742 000101 #101,-(R2) sMOVE TO MAILSOX # xeaneee 10] teeeene 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 i :DATA RESULT OF aon INCORRECT 
; OR SEQUENCE ERR 
penennhecadbatenamenenneqentiedidesententt opbckearecsnieisnniitliamubebibmbibncnumtneatien 
TEST 55 TEST MODE 1 USING NEGATE INST. 
DEERE RRR EERE REE ERE REE ER ERR E EE ERE RTE EEE RRR 
005212 S55: (R2) ;UPDATE TEST NUMBER 
000055 ; SEQUENCE ERROR? 
T BR TO ERROR HALT ON SEQ ERROR 
sPOINT TO LOC. O 
: CLEAR Ls 0 


foi t 


LOC. O= 
TRY NEG. LOC. O=-1 
1001 


7¢C= 


103404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


012742 000102 "MO #102,-(R2) :MOVE TO MAILBOX # *eexeee 102 sxnneee 
005242 -(R2) ‘SET MSGTYP TO FATAL ERROR 
000000 [NEGATE DID NOT SET CC'S CORRECTLY 


005237 000000 : f av0 TEST DATA RESULT 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 760 
012742 000103 #103,-(R2) sMOVE TO MAILBOX # «eeneee 105 seneene 
005242 -(R2) :SET MSGTYP_ TC FATAL ERROR 
DATA RESULT OF NEGATE INCORRECT 


:LOC. O= 
: TRY NEGB LOC. 0=1 
>CC=0001? 


none tt 
Wout 
tuuu 
tou tu 


AAAA 


& 


Seta ae 


co 
~N 
oO 


NEG13 
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1871 004464 102401 BVS NEG13 
1872 004466 103404 NEG14 
1873 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
1874 ; CONDITIONAL BRANCH INST. AND 
1875 ; REPLACE THE MOVE INSTRUCTION 
1899 ; WHICH FOLLOWS W/ 746 
1878 000104 MOV #104,-(R2) sMOVE TO MAILBOX # *eanxee 104 xeenene 
1879 -(R2) :SET MSGTYP TO FATAL ERROR 

HA :NEGB DID NOT SET CC'S CORRECTLY 
000000 : }43 a40 TEST DATA RESULT 


TS56 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 737 
012742 000105 #105,-(R2) sMOVE TO MAILBOX 4 seed 105 *keeeee 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 :DATA RESULT OF and. INCORRECT 
; OR SEQUENCE ERR 
Sian abdhiidiebiannbieniakennsien teetteenesteteeressbnanemmbesennegemmeiianinebans 
TEST 56 TEST MODE 2 USING NEGATE INSTRUCTION 
FOI IOIOIOIOI IOI II OTTO TAA ISASAAIIIIS SII III I IIIA AI IISIIAISISI AAAI AAS AANA HH 
095212 S56: (R2) ;UPDATE TEST NUMBER 
000056 sSEQUENCE ERROR? 
:BR TO ERROR HALT ON SEQ ERROR 
sPOINT TO LOC. O 
Ht aa LM. 0 


e « O= 
: TRY NEG.: LOC. O=-1 
;CC=1001? 


EREB 


SSBEREREES 


8 
WWRNMN— 
NOAHKOW 


RUSK 


0045 
0045 
0045 
0045 
0045 
0045 
0045 
0045 
0045 
0045 
0045 


103404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 767 


012742 000106 : #106 ,-(R2) ZMOVE TO MAILBOX # *xeenex 106 eeennne 


“wu u 
uuu 
uuu 


AAAA 
Le 


:SET MSGTYP TO FATAL ERROR 
;NEGATE DID NOT SET CC'S CORRECTLY 
= RO=LOC. 0 


;BYTE O=1 
(RO) + ;BYTE 1=1 
sRO=1 LOC. 
7RO=0 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 754 
012742 000107 #107,-(R2) sMOVE TO MAILBOX 4 sowed g 107 wxxneee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 SREGISTER NOT INCREMENTED CORRECTLY 


So Ss Ss 
OOOOOOO0O0O0D 
Ne 
SUONAUSWN oO 


10.0 

N 

m= 
AAAA 
“uuu 
nu 
nua 
noun 
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005337 000000 NEG22: DEC ard :LOC. 0=0 
001404 


BEQ TS57 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 745 
012742 000110 MOV #110,=(R2) sMOVE TO MAILBOX # kxeneee 110 teeenne 
005242 INC -(R2) 7SET MSGTYP TO FATAL ERROR 
HALT NEG BYTE INSTRUCTIONS FAILED 
: OR SEQUENCE ERROR 


iia ial laa iliac 


THIS TEST VERIFIES MODE 3 SINGLE OPERAND INSTRUCTIONS. IT 
USES LOCATION 0 AS ITS TARGET DATA. A TABLE LOCATED AT LOC. 400 
THRU 402 IS USED Le ald THE ADDRESS OF LOCATION 0 TO THE 


; INSTRUCT IONS UNDER 

RO IS SET TO 400, THE START_OF ot ADDRESS ee AND A CLR 
INSTRUCTION IS EXECUTED WITH MODE 3 TO CLEAR LOC. 0. THEN RO 
:1S_DECREMENTED BY TWO AND TWO OTHER MODE 3_INSTRUCTIONS OPERATE ON 
;LOC. 0 TO VERIFY THE DATA RESULTS OF THE TEST. THE PROPER INCREMENT ING 
: OF THE rig ih IS ALSO VERIFIED IN THIS MANNER 

FAILURE IS DETECTED BE SURE TO VERIFY THAT THE TABLE 

; (LOC. 400-402) HAS THE PROPER VALUES (0). 


TSHIRTS IDIOTS E E ne eeneenes 
TEST 57 TEST MODE 3 USING SOP INST. 
FORO OITA IIA IIA IIISII IIIS IIIS AISI III I AISI AIAN IANA AA 
TS57: (R2) UPDATE TEST NUMBER 
000057 #57, (R2) s SEQUENCE ERROR? 
TS60-10 [BR TO ERROR HALT ON SEQ ERROR 
RO SET RO=400 


SREKLLKL 
SCODNANRW 


—_ ot ow od 2 os 


_— 
‘Oo 
vw 
— 


CLEAR LOC 400 
:TRY TO CLEAR LOC 0 USING MODE 3 ;RO0=402 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITI BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 771 

000111 , sMOVE TO MAILBOX # *eeeeee 11] teenene 

-(P2) :SET MSGTYP TO FATAL ERROR 

:CLR DID NOT SET 2-BIT 
RESET RO=400 


:TRY TO COMPLEMENT LCC 0 OF MODE 3 ;RO=402 
TRY TO INCREMENT LOC 0 W/MODE 3 ;RO=404 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 757 


012742 000112 ; #112,-(R2) sMOVE TO MAILBOX # *xeeeee 8112 taeneee 
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1983 004676 005242 INC =-(R2) ;SET MSGTYP TO FATAL ERROR 

1984 004700 000000 HALT ;CUMMULATIVE RESULT OF ABOVE INST FAILED 

ieee : OR SEQUENCE ERROR 

1987 ia aaah ahahaha 

1988 

1989 THIS TEST VERIFIES MODE 3 SINGLE OPERAND BYTE INSTRUCTIONS 

1990 “WHICH ADDRESS EVEN BYTES. Scan THE TARGET LOCATION O IS USED 

1991 AND THE SAME TABLE AT 400 IS EMPLOYED. 

1992 AFTER POINTING R4& TO THE TABLE (400) AND SETTING LOCATION 

1993 30 TO =1, A CLRB INSTRUCTION IS USED TO CLEAR BYTE 0. 

1994 SEVERA AL OTHER MODE 3 INSTRUCTIONS ARE THEN USED WITH THE TABLE 

1995 :TO VERIFY THE DATA RESULTS AND THE PROPER INCREMENTING OF THE REGISTER. 

1996 ‘IF A FAILURE IS wt ees BE SURE THAT THE TABLE (LOCATION 400-402) HAS 

Lads + THE PROPER VALUES (0). 

1999 : Soeiepeepineepeeednnneinnsdeneamannianeenseeeenedbeimntbiniattansaliaitiainidieniainniee 
: TEST 60 TEST MODE 3 EVEN BYTE USING SOP INST. 

2001 BRI IH I eK i KH I IH I I HHH I HK Ke IH ICI IIT THT TTR KKK KEE KK EERE KEKE 

200? 004702 005212 TS60: INC (R2) ;UPDATE TEST NUMBER 

2003 004704 022712 000060 CMP #60, (R2) ;SEQUENCE ERROR? 

2004 004710 001026 BNE TS61-10 [BR TO ERROR HALT ON SEQ ERROR 

2905 004712 005004 CLR RS SET R4=400 

2006 004714 105104 COMB R4 

2007 004716 005204 INC R4 

2008 004720 005000 CLR RO ; INITIALIZE LOC. O=-1 

2009 004722 005010 CLR (RO) 

2010 004724 005110 COM (RO) ;LOC. O=-1 

004726 105034 CLRB a(R4)+ ;TRY TO CLEAR EVEN BYTE ;LOC. 0=177400 R4=402 

2012 004730 001404 BEQ SOPB3A 

2013 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ===> 

2014 ; CONDITIONAL BRANCH INST. AND ¢€s=22 

2015 F REPLACE THE “we INSTRUCTION ¢€=s=2 

2016 i WHICH FOLLOWS W/ 767 <zs== 

2017 004732 012742 000113 MOV #113,-(R2) zMOVE TO MAILBOX # Sioeees 1130 weeewee 

2018 004736 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

2019 004740 000000 HALT ;CLRB DID NOT SET 2-BIT 

2020 004742 005304 SOPB3A: DEC R4 SRESET POINTER R4=400 

2021 004744 005304 DEC R4 

2022 004746 005234 INC a(R4)+ ;TRY INCREMENTING WORD LOC.0=177401 R4=402 

2023 004750 100006 BPL SOPB3B 

2024 004752 105434 NEGB a(R4)+ ;TRY TO NEGATE EVEN BYTE ;LOC.0=-1 R4=404 

2025 004754 100004 BPL SOPB3B 

2026 004756 005304 DEC R4 7R4=402 

2027 004760 005304 DEC R4 

2028 004762 105234 INCB a(R4)+ ;TRY TO INCREMENT EVEN BYTE ;LOC. 0=17400 

2029 004764 001404 BEQ TS61 

2030 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <=s== 

2031 : CONDITIONAL BRANCH INST. AND <===2 

2032 F REPLACE THE MOVE INSTRUCT ION <z=== 

20335 : WHICH FOLLOWS W/ 751 <==== 

2034 004766 SOPB3B: 

tH 004766 012742 000114 MOV #114,-(R2) MOVE TO MAILBOX # xeexxee 114 xennnne 

20 004772 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

2037 004774 000000 HALT * CUMMULATIVE RESULT OF ABOVE INST FAILED 


2038 : OR SEQUENCE ERROR 
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CJKDB=B8 DCF11=AA CPU_DIAG. 
TEST MODE 3 EVEN BYTE USING SOP INST. 


CJKDBB.P11 19=JUN=79 10:52 


MACY11 30A(1052) 
T60 


SEQ 0039 


LEAKE REE EERE EERE KEE REEEEERE 


THIS TEST VERIFIES MODE 3 SINGLE OPERAND BYTE INSTRUCTIONS 
ZWHICH ADDRESS ra BYTES. THE TARGET IS BYTE 1. A TABLE AT 
el 400-406 IS USED. RO SERVES AS ag TABLE POINTER. 

RO IS INITIAL ZED TO 400. LOC. 0 IS SET TO -1 USING THE 
SFIRST TWO TABLE ENTRIES. A CLRB MODE 3 IS EXECUTED ON BYTE 1 USING 
: TABLE _ADDRESS AT 404. RO IS DECREMENTED TO 402 AND SEVERAL SOP 
:MODE 3 INS Mee Mh ARE USED TO VERIFY DATA RESULTS AND PROPER 
edna INCREMENT ING. 

THE TABLE yt Ae SHOULD CONTAIN 0,0,1,1 BEFORE AND 

{AF TER THE TEST IS R 


Peuendiebppeneqedasanenaseqnncnessensbosesacseneeeneanemensebseseenembensenanenniad 


:TEST 61 TEST MODE 3 ODD BYTE USING SOP INST. 


a te: an ct eee ae nee ee 


005212 TS61: (Re UPDATE TEST NUMBER 


022712 
001024 
005000 
105100 
005200 
005030 
005130 


105030 
001404 


012742 
005242 


012742 


000061 


000115 


000116 


rei (R2) 
Ts62-10 


RO 
RO 
a(RO)+ 
a(RO)+ 


@(RO) + 
SOPB3C 


#115,-(R2) 
-(R2) 


[MOV 


; INCREMENT WORD LOC. 0=400 RO=404 


SEQUENCE ERROR? 


BR TO ERROR HALT ON SEQ ERROR 


SET RO=400 


ae eit 
C O=-1 RO=404 


‘RY TO CLEAR ODD BYTE LOC. 0=377 RO=406 
TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDIT I 


teed 


:CLRB DID NOT SET Z-BIT 
SRESET RO=402 


:POINT TO EVEN BYTE ADDR. 


115 


. AND 


IONAL BRANCH INS 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 770 

E TO MAILBOX # 
:SET MSGTYP TO FATAL ERROR 


RKKKKKER 


AAAA 
nun 


TRY TO NEGATE ODD BYTE LOC. 0=177400 RO=406 
TRY TO INCREMENT ODD BYTE LOC.0=C RO=410 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITI 


ONAL BRANCH INST. AND 


REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 


;sMOVE TO MAILBOX # 


KKKKKKK 


116 


eeKKKE 


#116,~(R2) : 

INC -(R2) :SET MSGTYP TO FATAL ERROR 

HALT ;CUMMULATIVE RESULT OF ABOVE INSTS FAILED 
: OR SEQUENCE ERROR 


FERRER EERE REE KEKE EER EKER EERE REED 


iTEST 62 TEST MODE 3 USING NEGATE INSTRUCTION 


SKK RK RIK KERR ERK 


TS62: INC (R2) UPDATE TEST NUMBER 


005242 
000000 


005212 
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022712 000062 #62, (R2) : SEQUENCE ERROR? 

001054 1863-10 ‘BR TO ERROR HALT ON SEQ ERROR 
005000 0 =400 

105100 

005200 0 

005010 :LOC. 400=0 

005004 *R4=0 

005014 ‘LOC. O=0 


005214 LOC. O=1 
005430 ; TRY NEGATE LOC. O==1 *.0=402 
100003 


>CC=1001? 
001402 
102401 
103404 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


012742 000117 #117,-(R2) sMOVE TO MAILBOX # oon 117 teeeeee 
005242 -(R2) sSET MSGTYP TO FATAL ERR 

000000 3NEG DID NOT SET CC'S CORRECTLY 
005214 : (R4) [LOC. O=0 


001404 NEG32 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 
012742 000120 #120,-(R2) “MOVE TO MAILBOX # *keexee 120 teenene 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 [DATA RESULT OF NEG INCORRECT 
105137 000001 : af [LOC O= Ue, 
005237 000000 a40 :LOC. 0=177401 
105430 7 TRY NEGS. LOC. 0=177777 RO=404 


100404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 743 
A Logg 000121 #121,-(R2) “MOVE TO MAILBOX # kkeeeee 12] wewnnee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
[NE GB FAILED WITH EVEN BYTE 
a@(RQ)+ TRY NEGB LOC.0=777 RO=406 


NEG34 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 735 

#122,-(R2) [MOVE TO MAILBOX # teaexee 122 seennee 

-(R2) ;SET MSGTYP TO FATAL ERROR 

:NEGB FAILED WITH ODD BYTE 

- 0=177377 
as Q=177777 


AAAA 
nuuu 
in 


ee ii a a ad od od SS ot a os 
MRNA em es Ss OS Oe [ol eleal sla ele) 
NUS SBNRARWN—O SRR ARAUSOS 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


AAAA 


wu 
“une 


“wen 
noua 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 





C 4 
CJKDB=8 DCF 11=AA CPU_DIAG. MACY11 30A(1052) 19*JUN=79 11:08 PAGE 4 
CJKDBB.P11 19=JUN=79 10:52 162 TEST MODE 3 USING NEGATE INSTRUCTION 


: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 723 
005226 012742 000123 MOV #123,-(R2) ;MOVE TO MAILBOX # seeeene 123 seneeee 
005232 005242 INC =(R2) ;SET MSGTYP TO FATAL ERROR 
005234 000000 HALT [DATA RESULT OF NEGB'S INCORRECT 
; OR SEQUENCE ERROR 


STARA AAAAAAARARAEARAREAREEAAAAARREREARERARAAAAAERARRRAEREAEREEREREEEEERREREREEERRKE EEE 


now 


THIS TEST VERIFIES MODE 4 SINGLE OPERAND i cae cae 
“RO IS_SET TO 400. A CLR INS?RUCTION IS EXECUTED IN MODE 4 TO CLEAR 
:LOC. 376. RO IS RESET TO 400 AND A COM INSTRUCTION USING MODE 4 
= COMPLEMENTS LOC. 376. 

TWO INC INSTRUCTIONS AND A MODE 4 INSTRUCTION ARE EXECUTED 
“10: COMPLETE THE TEST 


SRRRRRERRRRRRRRRRER EERE EEEE EERE REE EERE ERR RRR R ERE R ARERR ERR E ERE RR ERROR EEEREEED 


STEST 63 TEST MODE 4 USING SOP INSTS 
FEAR RAR EERE ERE EREREE EERE EERE EREE EEE 
1S63: R2 ;UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 
:SET RO=400 


TRY TO CLEAR USING MODE 4 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 772 

000124 P sMOVE TO MAILBOX # teennee 124 ttnowne 

-(R2) :SET MSGTYP TO FATAL ERROR 

=CLR DID NOT SET 2-BIT 
sRESET RO 


TRY TO COMPLEMENT USING MODE 4 
sMOVE POINTER 


noun i 


001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 756 


012742 000125 #125,-(R2) sMOVE TO MAILBOX # seeneee 125 seanene 

005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 CHECK CUMMULATIVE RESULT OF ABOVE INST. 
; OR SEQUENCE ERROR 


AAAA 
“own 
iow i 


iuud 


Wu 


SRAARAREAR ERR RAAE RARER E REE RAE AERA RAEEARAERAERAEEAAEERERERREEREREEEEE 


; HIS TEST VERIFIES MODE 5 ow OPERAND INSTRUCTIONS. IT 
USES LOCATION 0 AS ITS TARGET DATA. A TABLE LOCATED AT LOC. 372 
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;THRU 374 IS USED > li THE ADDRESS OF LOCATION 0 TO THE 
: INSTRUCTIONS UNDER TEST. 

RO IS SET TO 376, (THE START OF THE re TABLE) +2, 
"AND A CLR INSTRUCTION 1§ EXECUTED WITH MODE 3 TO CLEAR 
:LOC. 0. THEN RO IS_ INCREMENTED BY TWO AND TWO OTHER MODE 3 
4 es ae OPERATE ON LOC. 0 TO VERIFY THE DATA RESULTS OF 

THE TEST. THE PROPER DECREMENTING OF THE REGISTER IS ALSO 
:VERIF ED” " Last ry MANNER . 
FAILURE IS DETECTED BE SURE TO VERIFY THAT THE TABLE 

: (LOC. 37 THRU 374) HAS THE PROPER VALUES (0). 


SSSCeSr ar SICeE IIS CUCeIcarererererevereetirreeeeerrrrreeeeertrereceeT st tteeeereeree 

TEST 64 TEST MODE 5 USING SOP INSTS 

5 Re Be eR IR I i eH I THT I I TT I I IT TT TTR EEK KEKE KEKE ERE 

005212 7S64: (R ;UPDATE TEST NUMBER 
000064 SEQUENCE ERROR? 
BR TO ERROR HALT ON SEQ ERROR 
000370 >CLEAR LOCATION 370-376 
(RO) :370 


1379 
3374 


3376 
ZSET RO=376 (LOW BYTE) 


0 
a-(RO) TRY TO CLEAR LOC 0 W/MODE 5 


SOP5A 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE ae INSTRUCTION 

WHICH FOLLOWS W/ 764 
000126 #126,-(R2) *MOVE TO MAILBOX # *keeeee 126 xeennee 

-(R2) sSET MSGTYP TO FATAL ERROR 
:CLR DID NOT SET 2-BIT 
[RESET RO 


TRY TO COMPLEMENT LOC. 0 W/MODE 5 
TRY TO INCREMENT LOC. 0 W/MODE 5 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 752 


012742 000127 #127,-(R2) :MOVE TO MAILBOX # *xxxeee 127 kannnne 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 ; TEST CUMMULATIVE RESULT OF ABOVE INSTS 

> OR SEQUENCE ERROR 


aati hill achalasia ahha beiniaiiaiaia a babelailadehaiaininabababated 


THIS TEST wr Ag MODE 6 SINGLE wie ye IT 
“USES LOCATION 0 AS ITS TARGET DATA. RO IS SET TO 400 U 
;PREVIOUSLY TESTED INSTRUCTIONS AND A MODE 6 CLR INSTRUCTION IS 
sEXECUTED ON LOC. 0 USING RO AND A -400 OFFSET. COM AND INC 


AAAA 
“uuu 
wun u 
ee 
nu u 
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‘wecieemceeneee ARE THEN USED TO VERIFY THE DATA. 


TSAI SISSIES III IISISISISISISISIIIIOII EIST DII III IE IHI I IIIEEEIES ines 
STEST 65 TEST MODE 6 USING SOP INSTS 
JOIS IOSD ISIDISISI IIIS IIOIUIOISIDIUISIOIOIIOIOIOIOI IIIT OTTO TTT OT TTT TI TIT TOT TTI TST TST STOTT TOT TTT OTT TOTO 
TS65: (R2) UPDATE TEST NUMBER 
000065 CMP #65, (R2) ; SEQUENCE ERROR? 
TS66-10 ;BR_TO ERROR HALT ON SEQ ERROR 
7s ;SET RO=400 


RO 
177400 a ;TRY TO CLEAR LOCATION 0 W/MODE 6 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 771 

012742 000130 #130,-(R2) sMOVE TO MAILBOX # kkxaxxe 130 teennne 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 H. :CLR DID NOT SET Z-BIT 

ora nee 177400 : COM ros ay TRY TO COMPLEMENT LOCATION 0 W/MODE 6 


00003 
005260 177400 — TRY TO INCREMENT LOCATION 0 W/MODE 6 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 757 


012742 000131 MOV #131,-(R2) sMOVE TO MAILBOX # *eeeeee 13] kaneene 
005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
000000 HALT 2 TEST CUMMULATIVE RESULT OF ABOVE INSTS 

: OR SEQUENCE ERROR 


Saath laa 


THIS TEST VERIFIES MODE 7 SINGLE OPERAND JNSTRUCTIONS. IT USES 
: THE POINTER TO _ O WHICH IS STORED AT LOC. 4 

RO IS SET TO 400 AND A MODE 7 CLR _ INSTRUCTION IS 
EXECUTED ~ band A +2 OFFSET TO CLEAR LOC. 0. 

SEVERAL OTHER MODE 7 INSTRUCTIONS ARE THEN USED ON THE COMMON 
:LOCATION TO VERIFY THE DATA RESULTS. 


005060 
001404 


| siecuciueielnnstteticedisieialaee incite cee theten apttiiniaentnaceciian 


TEST 66 TEST MODE 7 USING SOP INST. 


OUI IIIS IOI IIISIOIOIUIDIUIUIOIDIOIOIOIOIOIOIUIDIOIDIOIDIDIDIOIDIDIUIDIDISIUITIDIDIDIDIUIIUIUEISI OE ppbiieines: 
005212 TS66: R2) ;UPDATE TEST NUMBER 
000066 C Fo ey ERROR? 
S BR _TO ERROR HALT ON SEQ ERROR 
ZSET RO=400 


0 ;RO=1 
000002 ;TRY TO CLEAR LOC. 0 W/MODE 7 
001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
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CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 770 
012742 000132 #132,-(R2) “MOVE TO MAILBOX # kkeeeee 152 aaenenn 
005242 -(R2) 3$ 


000000 H ; Z-BIT 

005170 000002 : COM :TRY TO COMPLEMENT LOC. 0 W/MODE 7 
100003 B P7B 

005270 000002 ; TRY TO INCREMENT LOC. 0 W/MODE 7 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 756 


012742 000133 #133,-(R2) sMOVE TO MAILBOX # xexexee 133 wannnne 

005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 > TEST CUMMULATIVE RESULT OF ABOVE INSTS. 
: OR SEQUENCE ERROR 


FO III IK I II TI II III TTI TTI ITI I IIT TTT TT TTT EEK EERE RHEE 


TEST 67 TEST MODE 4 WITH NEGATE INSTRUCTION 
FOI ICICI III IOI IIIT IASAASA III ISISSSIS III AAAI IAI III ISNA I II AA AAIINIAICSANAAAA A A 
TS67: (R2 ;UPDATE TEST NUMBER 
000067 : SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


AAAA 
“nun 
Pie 
ihuud 
nu 


;LOC. O=177777, RO=2 
;TRY NEGATE, LOC. O=1 
:CC=0001? 


103404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


012742 000134 #134,-(R2) sMOVE TO MAILBOX # *eexKKe 134 xeennne 
2 -(R2) SET MSGTYP TO FATAL ERROR 

;NEG DID NOT SET CC'S CORRECTLY 

;TST RO WITH A NEG. 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 761 

012742 000135 #135,-(R2) MOVE TO MAILBOX # xkeenee 135 keeeeee 

005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 H :RO NOT DECREMENTED PROPERLY 

005310 : (RQ) TEST DTA RESULT OF NEG 


005632 001404 BE TS70 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


AAAA 
nu 


: ; RO 
001404 BE NEG42 


AAAA 
“uuu 
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005744 


005746 
005750 


012742 
242 


001404 


012742 
005242 
000000 


005212 
022712 


0001 36 


000070 


000137 


000140 


000141 


000071 


MACY11 30A(1052) 
167 


19=JUN=79 


11:08 


G 4 
PAGE 


45 
TEST MODE 4 WITH NEGATE INSTRUCTION 


MOV 
INC 
HALT 


#136,-(R2) 
-(R2) 


: WHICH FOLLOWS W/ 753 
sMOVE TO MAILBOX # sxxnnee 136 
SET MSGTYP TO FATAL ERROR 

DATA RESULT OF NEG INCORRECT 

; OR SEQUENCE ERROR 


RKkKKKKE 


¢€2s22 


SEQ 0045 


FERRER RRR EER REE REE EERE EERE ERR EEREEEEEEEEEKEEEKEKE EEE 


TEST 70 


TS70: 


NEGSO: 


NEGS1: 


NEG5S2: 


TEST MODE 5 WITH NEGATE INSTRUCTION 


FRIAR EERE RRR REE REE KER EKER KEKE KEE EERE REE EEE ERE EEE 


#137,-(R2) 
-(R2) 


(R4) 
NEGS2 


#140,-(R2) 
~(R2) 


RO 
RO 
TS71 


#141,-(R2) 
-(R2) 


UPDATE TEST NUMBER 
ae ue Eh ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


F ° 77 
: TRY NEGATE: 
:CC=0001? 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


sMOVE TO MAILBOX # xxexKee = 137 
3SET MSGTYP TO FATAL ERROR 
:NEG DID NOT SET CC'S CORRECTLY 


KREKEKKE 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 


140 


“MOVE TO MAILBOX # «xkxx«® Reh kk ee 
;SET MSGTYP TO FATAL ERROR 


DATA RESULT OF NEG INCORRECT 


: TO SCOPE: ay THE RIGHT BYTE OF THIS 


: ONDITIONAL BRANCH INST. AND 
; REPLACE THE A {eS TAT EON 
WHICH FOLLOWS W/ 746 


seeane REEKEEE 


“MOVE TO MAILBOX # 141 
‘SET MSGTYP TO FATAL ERROR 
;REGISTER NOT DECREMENTED PROPERLY 


OR SEQUENCE ERR 


AAAA 


“ouuwu 
“uu 


AAAA 


A AAT NACE TRIED GEE, Ma le ersten A 0 OP LM PLE LOCA NODE 


TEST MODE 6 WITH NEGATE 


FERRER EEK ERE REE KER ERE EKER EKER EERE KEE EERE EERE EREKRER EEE ERE ERE ERE RRR EERE 


sTEST 71 
1S71: 


INC 
CMP 


(R2) 
#77, (R2) 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
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001022 
005000 


012742 
005242 
000000 
105314 
001404 


012742 
005242 
000000 


103404 


012742 
005242 
000000 


108590 


177401 


000142 


000143 


000072 


000005 


000144 


H 4 
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+4 TO ERROR HALT ON SEQ ERROR 


sh 0=0 
sLOC. O=177777, R4=1 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTiON 
: WHICH FOLLOWS W/ 763 


MOVE TO MAILBOX # *%xeeee 142 kennnnn 
3SET MSGTYP TO FATAL ERROR 


:NEG DID NOT SET CC*S CORRECTLY 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 755 

[MOVE TO MAILBOX # sexxexe 143 
;SET MSGTYP TO FATAL ERROR 

[DATA RESULT OF NEG INCORRECT 

; OR SEQUENCE ERROR 


REKKKKE 


AAAA 


SEQ 0046 


CREAR EREREEEREEEREEEREEE EEE EEE 


TEST MODE 7 W/ NEGATE 


FERRER EERE EEE REE EERE EEE EERE EERE RARER KERR EEK EERE ERE REE EEE 


MACY11 30A(1052) 19=JUN=79 

171 TEST MODE 6 WITH NEGATE 
BNE TS72=10 
CLR RO 
CLR RL 
COMB ~=—s- RO 
CLR (R4) 
CLRB (RG) 
COMB 
NEG Fs (RO) 
BMI NEG60 
BEQ NEGO 
BVS NEG60 
BCS NEG61 

NEG60: 
MOV #142,-(R2) 
INC =(R2) 
HALT 

NEG61: DECB  (R4) 
EQ TS72 
MOV #143,-(R2) 
INC =(R2) 
HALT 

STEST 72 

TS72: INC 2) 
CMP #72, (R2) 
BNE TS73-10 
CLR 0 
CLR (RO) 
COM (RO) 
COMB 0 
NEGB  @5(RO) 
BMI NEG70 
BEQ NEG70 
BVS NEG70 
BCS NEG71 

NEG70: 
MOV #144,-(R2) 
INC =(R2) 
HALT 

NEG71: COMB RO 
COMB ~=—s (RO) + 
DECB ~—- (RO) 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
:BR TO ERROR HALT ON SEQ ERROR 


;LOC. 0=0 

:LOC. 0=177777 
:RO=377 
;RO+5= 404, 404=1, 
:C€C=0001? 


LOC. 0=777 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 765 


MOVE TO MAILBOX # xxxeene 144 
sSET MSGTYP TO FATAL ERROR 
:NEG DID NOT SET CC°S CORRECTLY 


sLOC. Q=400, RO=1 
0=0 


eeneeene 


AAAA 
iuuwu 


“wunu 
“nwt 
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005467 171670 NEG 0 ;USE NEG MODE 67 TO TST FOR ZERO 


001404 BEQ S73 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE Age INSTRUCTION 
WHICH FOLLOWS W/ 753 
012742 MOV #145,=(R2) “MOVE TO MAILBOX # weeewee 145 seeeene 
005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 
000000 HALT ‘DATA RESULT OF NEG WAS INCORRECT 
; OR SEQUENCE ERROR 


SRA AAA EREEREREEAREAEERAARAEAEAE EERE EEREREREEEEREERRERREE EKER RE Eee 


: THIS TEST VERIFIES PROGRAM COUNTER ADDRESSING WITH SOP 
: INSTRUCTIONS. CLR MODE 77 IS USED TO CLEAR THE LOCATION FOLLOWING THE 
2 INSTRUCTION (SOPX). THEN SINGLE OPERAND INSTRUCTIONS WITH MODFS 37, 67, 
377, USING INDIRECT POINTER SGPXAD ARE USED TO VERIFY THE DATA RESULTS 
: OF THESE INSTRUCTIONS. 


j pecabensnnineeneucubunicouecsnuanseubessemtatesaiaqnvetioenseneseesineneetneniinees 
TEST 73 TEST SOP INSTRUCTIONS MODES 2,3.6.7 WITH REGISTER 7 
fusseneeccnetntnecseonsnanecensqeneeseeseesessoveueteeentGaeTatt Ona Iaa Tan nUnE 
005212 173: (R2) ;UPDATE TEST NUMBER 

#73,(R2) > SEQUENCE ERROR? 

SOPB ;BR TO ERROR HALT ON SEQ ERROR 

(R7)+ :CLEAR NEXT LOCATION: (SOPX) 
SOPX: USE MODE 27 


SOPA 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
, CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 774 
012742 000146 #146,-(R2) “MoV E TO MAILBOX # xeeewee 146 eeenene 
tas 2) SET MSGTYP TO FATAL ERROR 


005237 006134 : 

005467 177754 sNEGATE SOPX W/MODE 67 
100003 BP SOPB 

005277 000012 ee z INC SOPX W/MODE 77 


001405 
; TO SCOPE: CLEAR THE RIGHT BYTE o THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS wW/ 760 


Oe ree #147,-(R2) sMOVE TO MAILBOX # senawee 147 eeeeene 
52 -(R2) 7SET MSGTYP TO FATAL ERROR 
- INC DID NOT SET 2-BIT 
OR SEQUENCE ERROR 
SOPKAD: SOPX ‘INDIRECT ADDRESS OF SOPX 


PRA AERA EAAAERH EER EEER TARA RAAAAAARERREREAREEERERRAE Re RRRHReReeeReeneeeeeeeeere 


THIS TEST VERIFIES SINGLE OPERAND NON~MOD IF YING yy a SE 
ZUSING MODE 0. RO IS SET TO ZERO AND THE CONDITION CODES ARE SET 
270 THE COMPLEMENT OF THAT EXPECTED BY THE INSTRUCTION. A Tr INSTRUCT I OM 


AAAA 


AAAA 

“ao 
ween 
“wuwu 
nrunu 
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COE. AND CONDITIONAL BRANCHES ARE USED TO TEST THE CONDITION 
ITITISIIITIIITITTTTILITI TTI TT TILT T LETT TTT TT TTT TTT eee TTT TTT TTT Tee 
TTEST 74 TEST MODE 0 SOP NON-MODIF YING 
FERRER ERATE ARERR TREE E RRR EREER EERE RR RRRE EERE EERE eee eee eeene 

S74: R2 ;UPDATE TEST NUMBER 
000074 + SEQUENCE ERROR 
TO ERROR HALT ON SEQ ERROR 
SINITIALIZE RO=0 
:SET CC=1011 


TRY TST W/ MODE 0 
ZCHECK THAT CC=0100 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
PEPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


012742 000150 #150,-(R2) sMOVE TO MAILBOX # seeenee 150 teeenen 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 CONDITION CODES NOT SET PROPERLY 

: OR SEQUENCE ERROR 


PERERA ERE ERE REE REE REE EERE EEE REE EEEREEREEREEEEEEEREEEEEAEAEEERERE EEE Ee 


AAAA 


THIS TEST pend A SINGLE OPERAND NON-MODIFYING BYTE INSTRUCTIONS WITH MODE 0. 
“RO IS SET TO 377 AND COMPLEMENT OF THE EXPECTED CONDITION CODES 
:1S_ LOADED IN PSw. a TSTB INSTRUCTION IS EXECUTED AND THE RESULTS 
ARE CHECKED WITH SEVERAL CONDITIONAL BRANCH INSTRUCTIONS. 
: THIS VERIFIES THAT THE PROPER BYTE WAS TESTED. 


POT TITITILITILELELELE LTTE TTT TT TELE TTT TTT TTT TT TTT TTT TTT TTT TTT TTT 

TEST 75 TEST MODE O EVEN BYTE W/ SOP NON-MODIF YING 

<a “ma 2 meee at ao eee 

1s75. (R2) :UPDATE TEST NUMBER 

000075 #75, (R2) SEQUENCE ERROR 
TS76=10 ZR TO ERROR HALT ON SEQ ERROR 

; INITIALIZE 
:RO=377 
SET CC=0111 


TRY TST EVEN BYTE 
CHECK CC=1000 


; TO SCOPE: oar THE RIGHT BYTE OF THIS 

; ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS wW/ 767 


012742 000151 , #151,-(R2) :MOVE TO MAILBOX # seeeeee 15] weeeees 
005242 -(R2) *SET MSGTYP TO FATAL ERROR 


NAAA 
woot 


“uuu 
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006300 000000 HALT CONDITION CODES NOT SET PROPERLY 
: OR SEQUENCE ERROR 


Sia tata ai antl atlanta ata ia nal nannies 


THIS TEST VERIFIES SINGLE OPERAND INSTRUCTIONS WITH MODE 1. 
“RO IS USED TO POINT TO AND CLEAR LOC. 0. THE COMPLEMENT OF THE 
sEXPECTED CONDITION CODES ARF LOADED IN THE PSW. A TST INSTRUCTION 
He Reuse ON LOC. 9 USING RO AND CONDITIONAL BRANCHES TEST 


DEAE IIIIIE IEEE SISSIES OOUIIIIUOIIOIUUDUDII EEE SETHE EER ER ERR ER EEEE EERE REESE 
TTEST 76 TEST MODE 1 SOP NON-MODIF YING 
UOC III ISUIOIUIUIDISIIIDIOIIIOUIUIIOIIIID IID IDE EERE EERE ktentene 
005212 TS76: (R2 ;UPDATE TEST NUMBER 
000076 C ; SEQUENCE ERROR? 

;BR TO ERROR HALT ON SEQ ERROR 

:POINT TO LOC O 

;CLEAR LOC 0 

: INITIALIZE 

:CC=1011 

:TRY TST W/ MODE 1 

CHECK CC=0100 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


012742 000152 #152,-(R2) MOVE TO MAILBOX # «xxaeee 152 teannne 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 [CC'S NOT SET PROPERLY 

; OR SEQUENCE ERROR 


g SENOS S SASSI SSS SSH SSSS SOSH NSES SSS SSSSN SSI NAH HSSONSHS Sea SHONg NSH SRST SNSNeRANSESeES 


THIS TEST SETS LOCATION 0 TO 377 AND THEN USES RO TO TEST 
“THE EVEN BYTE AND THE ODD BYTE USING SOP BYTE INSTRUCTIONS WITH MODE 1. 
AGAIN, CONDITIONAL BRANCHES ARE USED TO VERIFY THE SETTING OF THE 
: PROPER CONDITION CODE BITS. 


TTTILILELE TELE ELEC LET TTT TTTTTT LETTE TTT TTT TTT TTT TTT TTT TT TTT TT TTT REKEEKREREREE 
[TEST 77 TEST MODE 1 BYTE INST. NON-MODIF YING 
FR RRR RRR KEKE EERE KEE ERE EEK ERE EERE EERE EERE EKER EEE 
S77: (R2) ;UPDATE TEST NUMBER 
000077 #77, (R2) * SEQUENCE ERROR? 
TS100-10 [BR TO ERROR HALT ON SEU ERROR 
RO ‘POINT TO LOC 0 
(RO) [CLEAR LOC 0 
(RO) : COMPLEMENT BYTE 0 
SSET CC=0111 


(RO) TRY TST ON EVEN BYTE 
102402 SNMB1A 
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CJKDBB.P11 19=JUN-79 10:52 177 TEST MODE 1 BYTE INST. NON-MODIFYING SEQ 0050 
2655 006372 101401 BLOS SN*B1A 
2656 006374 100404 BM! . SN*B1B 
2657 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
2658 3 CONDITIONAL BRANCH INST. AND <==== 
2659 ; REPLACE THE MOVE INSTRUCTION <==== 
2660 5 WHICH FOLLOWS W/ 766 <==== 
2661 006376 SNMBiA: 
2662 006376 012742 000153 MOV #153,-(R2) sMOVE TO MAILBOX # «eeeeee 153 wannenn 
2663 006402 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
2664 006404 000000 HALT 3CC°S NOT CORRECT 
2665 006406 005000 SNMB1B: CLR RC 
2666 006410 005200 INC RO 
2667 006412 277 scc ;SET CC=1011 
2668 006414 000244 CLZ 
2669 006416 105710 TSTB (RO) ;TRY TO TST AN ODD BYTE 
2670 006420 102403 BVS SNMB1C ;CHECK CC=0100 
2671 006422 103402 BCS SNMB1C 
2672 006424 100401 BMI SNMB1C 
2673 006426 001404 BEQ TS100 
2674 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
2675 ; CONDITIONAL BRANCH INST. AND <==== 
2676 : REPLACE THE MOVE INSTRUCTION <==== 
2677 ; WHICH FOLLOWS W/ 751 ¢z=== 
2678 006430 SNMB1C: 
2679 006430 012742 000154 MOV #154,-(R2) sMOVE TO MAILBOX # *xeexee 154 teennee 
2680 006434 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
2681 006436 000000 HALT :CC°S NOT CORRECT 
ry) ; OR SEQUENCE ERROR 
2684 FI IH I IOI II IIT TOT IK IT ITI TT TTI TTI TTT TT TOT TREE ERE RED RRR RE 
2685 : 
2686 3 THIS TEST VERIFIES THE SINGLE-OPERAND NON-MODIF YING inp reuc tice 
2687 ;USING MODE 2. IT USES THE IDENTICAL PROCEDURE EMPLOYED IN THE 
2688 :MODE 1 TESTS. ADDITIONALLY, THE REGISTER IS CHECKED TO ASSURE THAT 
far 44 ZIT IS INCREMENTED PROPERLY. 
2691 + AERA RERREREERRERRARRREREREERERRRRERE ERE ERERER ERE R EEE E EERE ERE EEEEeeeeeeeees 
2692 : TEST 100 TEST MODE 2 WITH SOP NON-MODIF YING 
2693 SAP tat ana aaah en el atalino 
2694 006440 005212 TS100: INC (R2) ;UPDATE TEST NUMBER 
2695 006442 022712 000100 CMP #100, (R2> ; SEQUENCE ERROR? 
2696 006446 001020 BNE TS101-10 ‘BR TO ERROR HALT ON SEQ ERROR 
2697 006450 005000 CLR RO ZINITIALIZE RO=0 
2698 006452 005010 CLR (RO) CL EAR LOC 0 
2699 006454 000277 SCC SET cc=1011 
2700 006456 000244 CLZ 
2701 006460 005720 TST (RO) + sTRY TST W/ MODE 2 
2702 006462 102403 BVS SNM2A : CHECK CC=0100 
2703 006464 103402 BCS SNM2A 
27 100401 I SNM2A 
2705 006470 001404 BEQ SNM2B 
2706 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
2707 : CONDITIONAL BRANCH INST. AND <==== 
2708 : REPLACE THE MOVE INSTRUCTION <==== 
2709 5 WHICH FOLLOWS W/ 766 <€zzz= 


2710 006472 SNM2A: 


CJKDB-B DCF11-AA CPU_DIAG. 


CJKDBB.P11 


19=JUN=79 10:52 


012742 
005242 
000000 
005300 
005300 
001404 


012742 
005242 
000000 


005212 


100404 


012742 
005242 
000000 
005300 
001404 


012742 
005242 
000000 
005200 


900155 


000156 


000101 


000157 


000160 


MACY11 30A(1052) 
7100 


SNM2B : 


TO 3 


M 4 
11:08 PAGE 51 


TEST MODE 2 WITH SOP NON-MODIF YING 


19=JUN=79 
MOV #155,=(R2) 
INC -(R2) 
HALT 
DEC RO 
DEC RO 
BEQ TS101 
MOV #156,-(R2) 
INC -(R2) 
HALT 


INSTRUCTIONS IT USES RO TO POINT 0. LOCATION 0 
3 SET 77, THE EVEN AND ODD BYTE IS TESTED WITH TSTB INSTRUCTIONS 
:TO VERIFY THE CORRECT CC ARE SET. 


:PROPER INCREMENT ING. 


DS SESE EIS ISIE OOIIEIEIOOIOITISIS III IIIT TOIT TIO III II ISIE III tt tt 


STEST 101 


TS101: 


SNMB2A: 


SNMB2B: 


SNMB2C: INC 


sMOVE TO MAILBOX # 


SET MSGTYP 


6 


:MOVE TO MAILBO 


REKKKEKE 


TO FATAL ERROR 


7CC*S NOT CORRECT 
RESET RO 


155 


WEHKRKE 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 757 


SET MSGTYP 


;MODE 2 DID NOT INC REQ CORRECTLY 


“ERROR 


xX # 
TO FATAL ERR 


OR SEQUENCE ERROR 


FREER RRR KEE KKK EEK KEKE ERE EERE EKER EK EK 


THIS TEST VERIFIES MODE 2 £ Fabs. OPERAND NON-MODIFYING BYTE 


WITH L 


156 


THE REGISTER IS CHECKED FOR 


TEST MODE 2 - BYTE W/ SOP NON-MODIF YING 
n+ paper naar — tami cpt eto > ra la lala aaa 
UPDATE TEST NUMBER 
ZSEQUENCE ERROR? 

:BR_TO ERROR HALT ON SEQ ERROR 


(R2) 
#101, (R2) 
102-10 


#157,-(R2) 
-(R2) 


RO 
SNMB2C 


#160,-(R2) 
-(R2) 


RO 


; CLEAR 
AR LOC 0 
3 SET toc °05377 


SET CC=0111 


TRY TST OF 


. 
e 

7 
* 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. 


sMOVE TO MAILBOX # 


:SET MSGTYP 


:CC*S NOT SET 


EVEN BYTE 


REKKKKEK 


AND 


REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 


Stati 
TO FATAL ERROR 
CORRECTLY 


;DECREMENT RO 


“MOVE T 


TO MAI 
3SET MSGTYP ERROR 
DE 2 DID NOT INC REG CORRECTLY 


766 
157 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. 


KREKKKEKEK 


AND 


REPLACE THE ye 5 PATE TION 


WHICH FOLLOWS 


xX # eopededd 


LBRO. 
TO FATAL 


>MO 
:POINT TO ODD BYTE 


160 


RERKKDSE 


SEQ 0051 
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sSET CC=1011 


TRY TST OF ODD BYTE 
;CHECK CC'S=0100 


006602 


10 
12 
14 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 744 


#161,-(R2) sMOVE TO MAILBOX # *eeexee 816] xeenene 
-(R2) SET MSGTYP TO FATAL ERROR 
:CC'S NOT CORRECT 


AAAA 
nunun 


RO 
R 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 735 
012742 #162,-(R2) :MOVE TO MAILBOX # *xeeeee 8162 eeenene 
005242 -(R2) + SET MSGTYP TO FATAL ERROR 
000000 ;RO DID NOT INCREMENT PROPERLY 
; OR SEQUENCE ERROR 


FARRER EKER EERE REE KERRIER EEE EE 


: THIS TEST VERIFIES MODE_3 SINGLE OPERAND NON-MODIFYING INSTRUCTIONS. 
sA POINTER IN A TABLE AT LOC. 376 IS USED TO TEST LOCATION 0. 

THE CC'S AND THE REGISTER ARE CHECKED FOLLOWING THE 

TST MODE 3 INSTRUCTION. 


+ RRRRRREARRRRRER ERR RE EERE EERE ERR EEE ERE RRR REE EERE EEE eee eee 
STEST 102 TEST MODE 3 W/ SOP NON-MODIFYING INSTS 
Lah ies at Le, aden mat are eee 
TS102: ;UPDATE TEST NUMBER 
000102 H02 (R2) SSEQUENCE ERROR? 
BN 103-10 BR To ERROR HALT ON SEQ ERROR 


RO. 0= 
(RO) :CLEAR LOC 0 
A ;RO=376 


3SET CC=1011 


a(RO)+ TRY TST W/ MODE 3 
CHECK CC=0100 


100401 

001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
Sart REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 764 


“uuu 


AAAA 
“nue 





CJKDB=8 DCF11=AA CPU_DIAG. 
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012742 000163 
005242 


012742 000164 
005242 
000000 


000103 


000165 


100401 





B 5 
MACY11 30A(1052) i ioe t 11:08 PAGE 53 
7102 TEST MODE 3 W/ SOP NON-MODIFYING INSTS SEQ 0053 


#163,-(R2) sMOVE TO MAILBOX # *xeeenae 163 Kewenee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
oe CORRECT 


RO 


RO 
TS103 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
‘a WHICH FOLLOWS W/ 755 
#164,-(R2) MOVE TO MAILBOX # coecnen, 164 *eteeee 
-(R2) iSET MSGTYP TO FATAL ERROR 
MODE 3 DID NOT INC REG CORRECTLY 
; OR SEQUENCE ERROR 


RRR RR KERR ERK REE KEKE ERE 


: THIS TEST VERIFIES SOP TioC AGe4s wis INSTRUCTIONS MODE 3 
;LOC. O IS SET TO 377. TABLE AT 402-404 IS USED TO TEST 
:BYTE 0 AND BYTE 1. THE REGISTER” 1s” CHECKED FOR PROPER INCREMENTING AND 
; THE cc’ ARE VERIFIED 

THE TABLE AT LOC. 402-404 SHOULD CONTAIN 0 AND 1 BEFORE AND 
TAF TER THE VEST IS RUN. 


RRRRRRRERE EERE RRR EEE E EERE EERE EERE ERROR ERR EERE EERE eRe eee eee eee eee eee 
TEST 103 TEST MODE 3 - BYTES W/ SOP NON-MODIFYING INSTS. 
FI I HK I IK IK I IH HI II I I THI TI TT IKKE REE KEKE 
7S103: (R2) ;UPDATE TEST NUMBER 

#103, (R2) ;SEQUENCE ERROR? 

8104-10 BR TO ERROR HALT ON SEQ ERROR 


;RO=0 
CLEAR LOC_0 
:L0C. 0 =377 


7RO=402 
3CC=0111 


TRY TST OF EVEN BYTE 
CHECK CC=1000 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


#165,-(R2) sMOVE TO MAILBOX # xkeKeek 165 teenene 
-(R2) :SET MSGTYP TO FATAL ERROR 

CC'S NOT CORRECT 

SET CC=1011 


a(RO)+ TRY TST OF ODD BYTE 
CHECK CC=0100 


AAAA 
new 


nun 
nun 
Wout it 
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007014 001404 BEQ SNMB3D 


MACY11 30A(1052) 
7103 SEQ 0054 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 750 


sMOVE TO MAILBOX # *%xeeee §=6166 
:SET MSGTYP TO FATAL ERROR 

:CC°S NOT CORRECT 

(RO) + ;RO=410 

(RO) 

TS104 


KEKKKNEK 


012742 000166 
005242 


#166,-(R2) 
-(R2) 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 741 
#167,-(R2) sMOVE TO MAILBOX # **xexee 167 
-(R2) ;SET MSGTYP TO FATAL ERROR 
:TSTB DID NOT INCREMENT RO CORRETCLY 
: OR SEQUENCE ERROR 


FIR RRR EEK KKK KEE KERR EKER EERE EERE EERE EEE RE 


: THIS TEST VERIFIES MODE 4 SOP NON-MODIFYING INSTRUCTIONS. 

sLOC. 0 IS SET TO -1 AND THE CC'S ARE SET TO THE COMPLEMENT OF THE 
sEXPECTED RESULTS. RO AND SET TO 2 AND A TST MODE 4 IS EXECUTED. 

: THE CC*S ARE CHECKED WITH CONDI TIONAL BRANCH INSTRUCTIONS AND THE REGISTER 
1S CHECKED FOR PROPER DECREMENTING. 


+ ARRRRARRERERER ERR RRREREEREEERARRRRRER EERE ERER EERE REEE ER ERR RREEEREE REN ERRREEEE 


i TEST 104 TEST MODE 4 W/ SOP NON-MODIFYING INSTS 


ai tr sa Ghee Cif, GME Gane nee 


000167 


RRKKKKE 


005212 


012742 
005242 
000000 
005700 
001404 


000104 


000170 


TS104: (R2) 
#104, (R2) 
i 10 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
oe fo ERROR HALT ON SEQ ERROR 


ar 0=0 


€ O=-1 
SSE CC=1011 


TRY TST W/ MODE 4 
CHECK CC=0100 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITI 


#170,-(R2) 
~(R2) 


sMOVE TO MAILBOX # 
SET MSGTYP TO FATAL ERROR 


ONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


keekkke 170 weanene 


CC'S NOT CORRECT 


RO 
TS105 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
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CJKDBB.P11 19=JUN-79 10:52 T7104 TEST MODE 4 W/ SOP NON-MODIFYING INSTS SEQ 0055 
2935 WHICH FOLLOWS W/ 760 <2222 
2936 007112 012742 000171 MOV #171,-(R2) “MOVE TO MAILBOX # ‘teeeeee 17] xannnee 
2937 007116 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
2938 007120 000000 HALT TST MODE 4 DID NOT DEC RO CORRECTLY 
3444 ; OR SEQUENCE ERROR 
2941 FARRER REE ERE RRR REE EERE REE REE KEE REE ERE RE REREREEEEE EEE EEE 
2942 : 
2943 : THIS TEST VERIFIES MODE 5 SOP NON-MODIFYING INSTRUCTIONS. 
2944 ;I1T USES : POINTER AT LOC. 376 TO TEST LOC. 0. RO IS SET 
2945 :TO 400, A TST MODE 5 INSTRUCTION IS EXECUTED AND THE CC'S CHECKED. 
soc$ :RO IS CHECKED TO INSURE PROPER DECREMENTING. 
2948 TEESSIDE RE EERE REAR EERE EE ERE REE EEE R EERE EEER EEE EEE 
sTEST 105 TEST MODE 5 W/ SOP NON-MODIFYING INSTS 
2950 FIT II KK IKK TIKES 
2951 007122 005212 TS105: INC (R2) ;UPDATE TEST NUMBER 
2952 007124 022712 000105 CMP #105, (R2) s SEQUENCE ERROR? 
2953 007130 001022 BNE TS106-10 ‘BR TO ERROR HALT ON SEQ ERROR 
2954 007132 005000 CLR RO *RO=0 
2955 007134 005010 CLR (RO) ;LOC O0=0 
2956 007136 005110 COM (RO) :LOC Q=-1 
2957 007140 105100 COMB RO ;RO=377 
2958 007142 005200 INC RO ;RO0=400 
2959 007144 000277 SCC sSET CC=0111 
2960 907146 000250 CLN 
2961 007150 005750 TST a- (RO) sTRY TST W/ MODE 5 
2962 007152 102402 BVS SNMSA 3s CHECK CC=1000 
2963 007154 101401 BLOS SNM5A 
2964 007156 100404 BMI SNM5B 
2965 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
2966 : CONDITIONAL BRANCH INST. AND <==== 
2967 : REPLACE THE MOVE INSTRUCTION <==== 
2968 : WHICH FOLLOWS W/ 764 <z=zz 
2969 007160 SNMSA: 
2970 007160 012742 000172 MOV #172,-(R2) sMOVE TO MAILBOX # xeeeeee 172 xeennne 
2971 007164 905242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
2972 007166 000000 HALT :CC°S NOT SET PROPERLY 
2973 007170 005200 SNM5B: INC RO ;RO=377 
2974 007172 105100 COMB RO :RO=0 
2975 007174 001404 BEQ TS106 
2976 ; TO SCOPE: ae THE RIGHT BYTE OF THIS <==== 
oo77 ; ONDITIONAL BRANCH INST. AND <==== 
2978 5 REPLACE THE MOVE INSTRUCTION <=ss= 
2979 : WHICH FOLLOWS W/ 755 <== 
2980 007176 012742 000173 MOV #173,-(R2) sMOVE TO MAILBOX # voacedl. 1730 ta eeeee 
2981 007202 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
2982 007204 000000 HALT ‘MODE 5 DID NOT DEC RO CORRECTLY 
2983 ; OR SEQUENCE ERROR 
2985 DRE ER EERE REE REE REE REAR ERERREREEEEERA EERE ERR EEE 
2986 : 
2987 THIS TEST ean tS MODE 6 SOP NON-MODIFYING INSTRUCTIONS. 
2988 *RO IS SET TO 377 A MODE 6 TST INSTRUCTION IS EXECUTED 
2989 ;USING RO AND AN OFPSET OF -377. THE CC'S ARE CHECKED AS WELL 
2990 zAS RO TO INSURE IT WAS NOT ALTERED. 
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005212 
0 


100404 


012742 


001404 


012742 
005242 
000000 


000106 


177401 


000174 


000175 
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TEST MODE 5 W/ SOP NON-MODIFYING INSTS 


SEG 0056 


TOES SII IIIS IISIIOIIEISISI IIIS UOUSISIIIE III EE EEE r EE 


TEST MODE 6 W/ SOP NON-MODIFYING INSTS 


FI I I I II HI ITI TT TIRE RRR EERE ERE EEE REE EK 


ZTEST 106 
S106: 


(R2) 
#106, (R2) 
TS107=10 
RO 

(RO) 

(RO) 

RO 


-377 (RO) 
SNM6A 
SNM6A 


#174,-(R2) 
-(R2) 


RO 
TS107 


#175,-(R2) 
-(R2) 


UPDATE TEST NUMBER 


SSEQUENCE ERROR? 


ean ys ERROR HALT ON SEQ ERROR 


it 0=0 


C_O=-1 
:RO=377 
:SET CC=0111 


TRY TST W/ MODE 6 
sCHECK CC=1000 


; TO SCOPE: fina THE RIGHT BYTE OF THIS 


DITIONAL BRANCH INS 


T. AND 


REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 764 


sMOVE TO MAILBOX # *%%KKKe §=174 
:SET MSGTYP TO FATAL ERROR 
:CC°S INCORRECT 


; TO SCOPE: CLEAR THE RIGHT BYTE O 
COND 


ITIONAL BRANCH INS 


KKKKKEKK 


F THIS 
T. AND 


REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 756 


[MOVE TO MAILBOX # texexee 175 


. 
e 


:SET MSGTYP TO FATAL ERROR 
TST MODE 6 INCORRECTLY CHANGED RO 
OR SEQUENCE ERROR 


RHKKKKEK 
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TEST MODE 6 W/ SOP NON-MODIFYING INSTS 


SEQ 0057 


FI RRR RRR KEE 


SIT USES A POINTER TO LOC. 
:RO IS SET TO 377 AND LOC. 


THIS TEST VERIFIES MODE 7 SOP NON-MODIFYING ratte add ee 


:RO AND AN OFFSET OF 1. 


Q STORED AT LOC. 400 TO TST LOC. 0. 
0 IS TESTED THRU THE POINTER AT 400 USING 


TGCS ISSUES ISISISISISISSIUISISISIIEIUOISISISISISISISIIIIEIIIIIIIOI IIIS III III EERE Ee 


TEST MODE 7 W/ SOP NON-MODIFYING INSTS. 


5 HH HH II HH He I TI ITT TTI REE REE EEE EKER EEE 


sTEST 107 

TS107: INC (R2) 
CMP W107, (R2) 
BNE TS110-10 
CLR RO 
CLR (RO) 
COM (RO) 
COMB RO 
Scc 
CLN 
TST a1 (RO) 
BVS SNM7A 
BLOS SNM7A 
BM! SNM7B 

SNM7A: 
MOV #776,-(R2) 
INC -(R2) 
HALT 

SNM7B: COMB RO 
BEQ ™S110 
MOV #177,-(R2) 
INC -(R2) 
HALT 


UPDATE TEST NUMBER 
;SEQUENCE ERROR? 
“on TO ERROR HALT ON SEQ ERROR 


:CC=0111 


;TRY TST W/ MODE 7 
CHECK CC=1000 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 764 


sMOVE TO MAILBOX # *xxaeee = 176 
:SET MSGTYP TO FATAL ERROR 
13%, NOT CORRECT 


RKKKKK 


TO SCOPE: CLEAR THE RIGHT BYTE UF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE ye INSTRUCTION 
WHICH FOLLOWS WwW v 


“MOVE TO MAILBOX # beoeset 

;SET MSGTYP TO FATAL ERROR 
INCORRECTLY CHANGED RO 

; OR SEQUENCE ERROR 


KaKREKE 


STST MODE 7 


AANA 


AAAA 
"onmu u 


iuudy 
mow ou 
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3069 FRI TT RTT ITT TT TT RRR REE RE REREEREEREEERERRA EERE NRE ERR 
30706 : 

307% THIS TEST VERIFIES MODE 0 DOUBLE OPERAND INSTRUCTIONS. IT SETS 

3072 “DATA IN RO AND R4 AND USES THE ADD INSTRUCTION TO TEST THE DOP 

bh ;MICROCODE . 

3075 USTUSTISITITTITTTITITISTTITITITETTTTTTTTTTTTTTTET TET TT TTT TTT TTT TTT TTT TTT TTT TTT 
3076 S TEST 110 TEST MODE 0 DOUBLE-OPERAND (DOP) INSTS. 

3077 DOI IIIIOIIIIISIIIUIISIOIIOIIIOIOIUIIOIOIIIIOIOIIUIUIIUIIUIOIIOIIDUIOOIUIIIOIOIUIOIIOI EERE REE ER EERE ER 
3078 007352 005212 75110: INC (R2) ;UPDATE TEST NUMBER 

3079 007354 022712 000110 CMP #110, <R2) : SEQUENCE ERROR? 

3080 007360 001006 BNE ™S$111-10 ;BR TO ERROR HALT ON SEQ ERROR 

3081 007362 005000 CLR RO *RO=0 

3082 007364 005100 COM RO ;RO=-1 

3083 007366 005004 CLR R4 ;R4=0 

3084 007370 060004 ADD RO,RS ;TRY ADD: R4=-1 

3085 007372 005204 INC R4 =R4=0 

3086 007374 001404 BEQ T$111 

3087 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
3088 ; CONDITIONAL BRANCH INST. AND ¢€=ss2=2 

$089 : REPLACE THE MOVE INSTRUCTION ¢€zzzz 

3090 s WHICH FOLLOWS W/ 771 ¢==== 

3091 007376 012742 000200 MOV #200,-(R2) sMOVE TO MAILBOX # **exeee 200 xaennee 

3092 007402 005242 INC -(R2) 7SET MSGTYP TO FATAL ERROR 

3093 007404 000000 HALT SADD INST. FAILED W/ MODE 0 

soe : OR SEQUENCE ERROR 

3096 DIO IOIIIUIOIIOIOIOIOIIOIIDISIDIIIOIOIUIOIOIOIOIOIIOIOIOIOIOIOIOIOIIOIIOIOIOIOIOIOIIOISISIDIOIIOIOIOIDIDIUIDIDIDIOI IID GIO IOI int 
3097 : 

3098 2 THIS TEST VERIFIES THE MOVE INSTRUCTION WITH MODE O TO MODE O. 

3100 elbidaianataqunibianinnledalayeantiininisaieintiinbnmiaaieaaaacdeuntiabaabiabiaiaiitehanpetbeedcadlt 
3101 sTEST 111 MOV MODE 0 TO MODE 0 

3102 DOI IOIIOIOII I IIIOIUIUIIIIIIOIIOIUIUIIUIIIIIIOIOIUIOIUIOIOIIIOIOIOIOIOIIOIIOOIOOUII On ht ni ttter 
3103 007406 005212 1S111: INC (R2) ;UPDATE TEST NUMBER 

3104 007410 022712 000111 CMP #111, (R2) : SEQUENCE ERROR? 

3105 007414 001006 BNE TS112-10 7BR TO ERROR HALT ON SEQ ERROR 

31 007416 005000 CL RO ;RO=0 

3107 007420 005004 CLR R4 7R4=0 

3108 007422 005100 COM Q RO=- 

3109 007424 010004 MOV RO,R4 TRY MOVE -1 TO R4 

3110 007426 005204 INC R4 7 IN 

3111 007430 001404 BEQ TS112 

3112 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <===2 

3113 a CONDITIONAL BRANCH INST. AND ¢€s==2 

3114 2 REPLACE THE MOVE INSTRUCTION <==== 

3115 : WHICH FOLLOWS W/ 771 <=s= 

3116 007432 012742 000201 MOV #291,-(R2) :MOVE TO MAILBOX # *eexnee® 20] tenants 

3117 007436 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

3118 007440 000000 HAL T sMOVE FAILED MODE 0 TO MODE 0 

Sion ; OR SEQUENCE ERROR 

3121 PUA REEEEE EERE REE RRR RENE RRR ERE EEE 
3122 : 

3123 ° THIS TEST VERIFIES THE SUBTRACT INSTRUCTION WITH MODE 0,0. 
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CJKDBB.P11 19=JUN=79 10:52 1111 MOV MODE 0 TO MODE 0 SEQ 0059 


USTITITITITITITITITITITTTTTITITITITTTITT TTT TTT TITLE TTT TTT TTT TTT TTT Ti TTTT TTT 
TEST 112 TEST SUB MODE 0,0 
PERE EEE EERE RRR REE RRR RRR ERE ERE EE 
T$112: (R2) ;UPDATE TEST NUMBER 
C ; SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


7R4=0 

sR4=1 

:TRY SUB 0,0 RO=-1 
:CC=1001 


VERRAN 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


000202 ; #202,-(R2) ZMOVE TO MAILBOX # *xeeeee 202 aeeenne 
-(R2) SET MSGTYP TO FATAL ERROR 
SCONDITION CODE FAILED ON SUB 


AAAA 
fou u 


RO 
T8113 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 761 
012742 000203 #203,-(R2) sMOVE TO MAILBOX # *exeeee 203 ennenne 
005242 -(R2) :SeT MSGTYP TO FATAL ERROR 
000000 ;DATA RESULT OF SUB FAILED 
; OR SEQUENCE ERROR 


A AAA 
wou a 
niuwdu 
iouww uu 
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C JKD8B.P17 19=JUN=79 10:52 1112 iEST SUB MODE 0,0 SEQ 0060 


FATA ORR RE REAR EEE EEAAHERARAEEAARA AREER ERERAARERREEERRAEREREERREARRERERERE REE Ee 


THIS TEST QUICKLY VERIFIES THE REMAINING DOP “1 tie INSTRUCTIONS 
;wITH MODE 0,0 TO PROVIDE A BASELINE FOR SUBSEQUENT TES 

7SINGLE OPERAND INSTRUCTIONS ARE USED TO SET UP DATA IN "26 AND R4 

seERriED OF THE SEVERAL DOP MODIFYING INSTRUCTIONS ARE USED AND 

; VER 


+ CROOReeenneerereerennanereneeeeennenneeereeneceneconenneeeeeneennaeeeeeeeeoeececeses 


sTEST 113 TEST ALL THE DOP INSTRUCTIONS W/ SOURCE MODE 0.0 
ePIC IIIT CITI Tee TTS ETT TTS TTT TIT TTT TTT TTT TTT TTT TTT TTT TTT 
75713: INC (R2) ; UPDATE TEST NUMBER 

CMP #113, (R2) + SEQUENCE ERROR? 

BNE 7$114=10 ;BR TO ERROR HALT ON SEQ ERROR 

CLR RO ;RO=0 
RO,RS sTRY MOVE MODE 0,0 


DOPOA 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 774 
#204,-(R2) . sMOVE TO MAILBOX # suaeeee 204 eeeneee 
-(R2) :SET MSGTYP TO FATAL ERROR 
+ ae i NOT SET 


*RO=177776 
*R4=177777 


AAAA 
uuu 


TRY BIC: R4=1 
0 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 
REPLACE THE ee INSTRUCTION 

: WHICH FOLLOWS W/ 762 

SMOVE TO MAILBOX # seeneee 205 seenene 

:SET MSGTYP TO FATAL ERROR 

BIC CLEAR red py mect 

TRY BIS: R4=1777 


sR4=0 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
j CONDITIONAL BRANCH INST. AND 
. REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 752 

012742 . MOVE TO MAILBOX # senenee 2PD6 eeeeeee 

005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 i he OF BIS INCORRECT 


© 0= 

;RO=377 

7R4=0 

3R4=177777 

:R4=177400 

ZTRY ADD: R4=177777 
4-0 
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3214 
3215 


097626 001404 


007630 012742 
007634 005242 
000000 


007650 012742 
007654 005242 
000000 
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000210 
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61 


TEST ALL THE DOP INSTRUCT IONS wW/ SOURCE MODE 0,0 


BEQ 


DOPOD 


#207,-(R2) 
=(R2) 
RO,RS 

R4 

RG 

TS114 


210,-(R2) 
=(R2) 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 736 

move TO MAILROX #@ eeeneee O07 eeeneee 

SET MSGTYP TO FATAL ERROR 


“RESULT OF ADD INCORRECT 
3177401=R4 

3R4=177777 

sRD=-0 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 726 

“MOVE TO MAILBOX # seeeeee PI senenee 

3SEY MSGTYP TO FATAL ERROR 

:RESULT OF SUB INCORRECT 

OR SEQUENCE ERROR 


e222 


<€£s>==>: 
< 


A AAA 


SEQ 0061 
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103404 


012742 
005242 
000090 
105137 
005337 
001404 


012742 


000114 


000000 


000211 


000000 
000000 


000212 
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TEST ALL THE DOP INSTRUCTIONS W/ SOURCE MODE 0,0 


SEQ 0062 


FRR AAAA EEA AE TRAE RARER AEER EERE REERRERHEEEREERE RE ERE ETE AH Ree eee 


THIS TEST VERIFIES MODE 0,xX DOUBLE OPERAND INSTRUCTIONS. IT S 
DATA IN RO AND LOCATION 0 AND OPERATES UPON IT USING DOP INSTRUCTIONS... 


UTTITITITITITILITITILITITITITITITETTTTTT LTTE LTTE TTT TTT TTT TTT TTT TTT TTT TTT TTT 


TEST MODE 0,X DOUBLE-OPERAND INSTRUCTIONS 


SEAR RARER EERE EEE ERA ERERA REAR REEEREEEAEAEEERAREEEAERAREEERERE TERRE EKER EEE 


STEST 114 
15114: INC (R2) 
CMP #114, (R2) 
BNE 15115=10 
CLR RO 
CLR (RO) 
COMB (RO) 
INC (RO) + 
NEG RO 
ADD 0, 
BMI DOPO3A 
BEQ DOPO3A 
BVS DOPO3A 
BCS DOPO3B 
DOPO3A: 
MOV #211,-(R2) 
INC -(R2) 
HAL | 
DOPO3B: COMB afd 
DEC a0 
BEQ T5115 
MOV #212,-(R2) 
INC -(R2) 
HALT 


:MOVE TO MAILBOX # 


UPDATE TEST NUMBER 
; SEQUENCE ERROR 
:BR TO ERROR HALT ON SEQ ERROK 


° 77 
- 0=400 RO=2 
sRO=-2 
TRY ADD 57" ai 4 
>CC=0001? 


- 0=376 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLI OWS W/ 764 


kkaakene 217 


;SET MSGTYP TO FATAL ERROR 
sec*s pat SET CORRECTLY 


RERKRRERE 


LOC. 


. 
° 


- 
e 


:MOVE TO MAILBOX # 


:LOC. O=0 


TO SCOPE: aay THE RIGHT BYTE OF "aa 
ONDITIONAL BRANCH INST. 
REPLACE THE MOVE INSTRUC TION 
WHICH FOLLOWS W/ 753 


keakeee O10 wheneee 


;SET MSGTYP TO FATAL ERROR 
:DATA RESULT INCORRECT 


OR SEQUENCE ERROR 


nun 
ioueouw 
nuna 
nomi tt 


AAAA 


nou 
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CJKDBB.P11 19=JUN=79 10:52 7114 TEST MODE 0,X DOUBLE-OPERAND INSTRUCTIONS SEQ 0063 
3274 Fhabalalalalalalalalahabalelelelalalaleleleieiebalehiaheiehheebebebebebeleiebbiebiebebihbbbbbebeiebhibbhiebieiiiiiniiiaihiliiiaa 
3275 : 

3276 THIS TEST VERIFIES MODE 0,0 DOP NON-MODIFYING INSTRUCTIONS. 
3277 “RO AND R4 ARE PRESET TO O AND 1 RESPECTIVELY. COMPARE INSTRUCTIONS ARE 
$556 ; THEN EXECUTED AND CHECKED. FIRST R4 IS COMPARED TO RO THEN RO TO R4. 
3280 TSE EISSN IIIIIISIISISUIUUIEUI EET IEEE RES EEE EE EE EEE EERE EEEE 
3281 STEST 115 TEST DOP NON-MODIFYING INST. W/ SOURCE MODE 0,0 
3282 DURES IOIIOIOIIIOISIIOIIOIIIIIOOIIUIIDIOIOIIOIIDIOIUIIIOUIOIOOIOUIIUODIEE SEE tht nnnnnnsene 
3283 007750 005212 75115: INC (R2) ;UPDATE TEST NUMBER 
3284 007752 022712 000115 CMP #115, (R2) ; SEQUENCE ERROR? 
3285 007756 001042 BNE TS116=10 ‘BR TO ERROR HALT ON SEQ ERROR 
3286 007760 005000 CLR RO ;RO=0 
3287 007762 005004 CLR R4 TR4= 0 
3288 007764 005204 INC R4 *R4= 1 
3289 007766 020400 CMP R4,RO TRY COMPARE R4 TO RO 
3290 007770 003004 BGT DNM1 
3291 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
$292 ; CONDITIONAL BRANCH INST. AND <==== 
3293 : REPLACE THE MOVE INSTRUCTION <==== 
3294 8 WHICH FOLLOWS W/ 772 ¢€z2z=z 
3295 007772 012742 000213 MOV #213,-(R2) sMOVE TO MAILBOX # eaxewe 2135 eennene 
3296 007776 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
3297 010000 000000 HALT =CC°S NOT CORRECT FOR CMP 
3298 010002 020004 DNM1: CMP RO,R4 ; TRY COMPARE RO TO R4 
3299 010004 002404 BLT DNM2 
3300 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
3301 ; CONDITIONAL BRANCH INST. AND <==== 
3302 ; REPLACE THE MOVE INSTRUCTION <=22= 
3303 ; WHICH FOLLOWS W/ 764 (=== 
3304 0100056 012742 000214 MOV #214,-(R2) sMOVE TO MAILBOX # #exKeee O14 xetnnnn 
3305 010012 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 

010014 900000 HALT a S NOT CORRECT FOR CMP 
3307 010016 005200 DNM2: INC RO ;RO=1 
3308 010020 020400 CMP R4,RO s TRY COMPARE R4=1 TO RO=1 
3309 010022 001404 BEQ DNM3 
3310 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
3311 a CONDITIONAL BRANCH INST. AND  <==== 
3312 : REPLACE THE MOVE INSTRUCTION <==== 
3313 FY WHICH FOLLOWS W/ 755 (2225 
3314 010024 012742 000215 MOV #215,-(R2) sMOVE TO MAILBOX # *keeeee 215 kenneee 
3315 010030 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
3316 010032 000000 HALT :CC°S NOT CORRECT (Z=1) FOR CMP 
3317 010034 005000 DNM3: CLR RO : RO=0 
3318 010036 005100 COM RO :RO=177777 
3319 010040 005004 CLR RS 7R4=0 
3320 010042 030004 co) ee RO,R4 : TRY BIT RO TO R4 
3321 010044 001404 BEQ DNM4 
3322 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
3323 ; CONDITIONAL BRANCH INST. AND <==== 
3324 3 REPLACE THE MOVE INSTRUCTION <==== 
3325 ; WHICH FOLLOWS W/ 744 €xszz 
3326 010046 012742 000216 MOV #216,-(R2) sMOVE TO MAILBOX # xeeeenee 216 teennne 
3327 010052 005242 INC -(R2) 2 SET MSGTYP TO FATAL ERROR 
3328 010054 000000 HALT :¢C' S_NOT CORRECT FOR BIT 


3329 010056 005304 DNM4: DEC R4 3R4=177777 
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010060 030004 BIT RO,R4 : TRY BIT AGAIN 


010062 100404 BMI TS116 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
3 CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; tg FOLLOWS W/ 735 
012742 000217 MOV #277,-(R2) sMOVE TO MAILBOX # see yg 217 wkeenne 

INC -(R2) sSET MSGTYP TO FATAL ERROR 

HALT CC' S NOT CORRECT FOR BIT 
; OR SEQUENCE ERROR 


SAIC IOSD ICONIC TOIT IOI ROTI ITT TTR ROTOTRTOTTT TOR HR He th te et 


: THIS TEST VERIFIES MODE 0,X DOUBLE OPERAND NON-MODIFYING INSTRUCTIONS. 
a SETS DATA IN RO AND LOCATION 0 AND COMPARES THEM USING DOPNM INSTRUCTIONS. 


+ RERRRAARRRORARAAERERRRRERERERERERRERAAREERERERAARRARRREEEERERRERAERRREREEEEEEREEREEEe 
[TEST 116 TEST MODE 0,X DOUBLE-OPERAND NON-MODIFYING INSTS. 
Bee ee aa NERARAARARRERAAAAARAAARENKAAAARANRARARAARARARSAAANHAAAAASeKNNNANNANTENETS 
TS116: (R2) :UPDATE TEST NUMBER 
000116 #116, (R2) : SEQUENCE ERROR 
TS117-10 Be TO ERROR MALT ON SEQ ERROR 


AAAA 
nue 
‘uuh 
“onn 
nnunu 


;LOC. O0=0 
SLOC. 0=177777 
RO :RO=1 
000000 MP sTRY CMP MCDE 0,3 
C=0001 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 


000220 #220,-(R2) sMOVE TO MAILBOX # keeeKHe 200 KeeKKeEE 
-(R2) :SET MSGTYP TO FATAL ERROR 
RO :CC°S NOT SET CORRECTLY 
DNMO3C 
(RO) 
001404 TS117 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 


012742 000221 MO » #221,-(R2) :MOVE TO MAILBOX # kxxxeeee 22] aeenene 
-(R2) SET MSGTYP TO FATAL ERROR 
DATA INCORRECTLY MODIFIED BY CMP 
: OR SEQUENCE ERROR 
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aaa aaa aaa acai tl alll nie atts 


THIS TEST igs hg MODE 1 DOP INSTRUCTIONS. RO IS SET TO <1 
“AND LOC 0 TO 1. R4 IS THEN CLEARED AND USED TO POINT Ys LOC 0. 
IN THE ADD MODE 1 RINSTRUCT ION. LOC 0 IS ADDED TO RO AND THE 
;RESULTS VERIFIED. 


DEAE IDUIIEIIIS OSI URE EERE EE EEE RE EEE EEE RARE EERE ER EEE EEE EES 
STEST 117 TEST MODE 1 W/ DOP INST. 
SRR RE RRR REE KEKE KERR EEE REE KEE REE REE 
1S117: (R2) :UPDATE TEST NUMBER 

#117, (R2) S SEQUENCE ERROR? 

Ts126-10 :BR TO ERROR HALT ON SEQ ERROR 


RO=0 
:RO=177777 
3R4=0 


:LO¢ C 0-0 =0 
At ADD SOURCE MODE 1 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 770 

012742 #222,-(R2) sMOVE TO MAILBOX # *«eeeee 222 xeenene 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

010214 000000 [RESULT OF ADD INCORRECT 

: OR SEQUENCE ERROR 


AAAA 
“unu 
nun 
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¥ 
all 


: SERA REEEREEERERE EEE 


3 THIS ‘he VERIFIES MODE 1 DOP BYTE INSTRUCTIONS WHICH ADDRESS 
sEVEN BYTES. LOC. 0 1S SET TO =1 AND R4 IS CLEARED. THEN R4 IS 
i SET TO =1 USING A BISB THRU RO WITH MODE 1. 


SRRRRRRRRERERERR ER ERREE REE R ERR EERE EERE RRR EE REE EERE RERE EERE REE E EE EE EER ERE EEE 
TEST 120 TEST MODE 1 = EVEN BYTE W/ DOP INSTS. 
RARER ER ERR REE EERE EERE EER ERE EERE REE RRR 
010216 005212 $120: (R2) ;UPDATE TEST NUMBER 
000120 #190, (R2) ; SEQUENCE ERROR? 
BN TS121-10 :BR 


NN 2 SS SS es SS 
WN" OCODNAUSWN=-O 


TO ERROR HALT ON SEQ ERROR 


RO = 
(RO) :LOC. O0=0 

(RO) :LOC. 0=177777 

R4 *R4=0 

2 (RO) .RG TRY MODE 1=- EVEN BYTE W/ DOP 
010242 001404 T$121 ' 


FEKFEEKERERERELE 
LS 


: TO SCOPE: CLEAR THE RiGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
2 REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 770 
010244 612742 000223 #223,-(R2) sMOVE TO MAILBOX # eee 223 newnnnn 
010250 005242 -(R2) SET MSGTYP TO FATAL ERROR 
010252 090000 ;RESULT OF BISB IS INCORRECT 
; OR SEQUENCE ERROR 
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FERRER RRR RRR KR RR E RR EEEREEREEEREEEEEREEEEEEREEEE 


THIS TEST VERIFIES MODE 1 DOP NON-MODIFYING INSTRUCTIONS 
“WHICH ADDRESS EVEN BYTES. LOC. 0 IS SET TO -1 AND RO_IS CLEARED 
sAND USED AS THE ADDRESSING REGISTER. R4 IS SET TO 377 AND A 
:MODE 1,0 CMPB INSTRUCTION IS USED THE RESULTS VERIFIED. 


TASES OSES IEEE EERE REE EERE EER ER EER EER EER EE EES 
TEST 121 TEST MODE 1 = EVEN BYTE W/ DOP NON-MODIFYING INST. 
FRR RRR RRR RRR EERE EKER KEE EEK REE REE EERE EKER EEE 
010254 2 7s121: (R2) UPDATE TEST NUMBER 
000121 C #121, (R2) SEQUENCE ERROR? 
TS BR TO ERROR HALT ON SEQ ERROR 


[LOC O=0 

3LOC 0=177777 

7R4=0 

3R4=377 

;TRY MODE 1 = EVEN BYTE W/ DOP NON-MODIFYING 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
$ WHICH FOLLOWS W/ 770 
010302 012742 000224 #224 ,-(R2) sMOVE TO MAILBOX # *x%eeKe 224 keene 
010306 005242 -(R2) SET MSGTYP TO FATAL ERROR 
010310 000000 ;RESULT OF CMPB INCORRECT 
; OR SEQUENCE ERROR 


ee a yd 
OnNOUES WP 
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A cic ae aa a a lati il ila ita 


THIS TEST VERIFIES MODE 1,0 MOVB uae 
WHICH ADDRESS EVEN BYTES. LOC. 0 IS SET T hb tek a CLEARED AND 
4 IS SET TO -1. MOVB ARE USED TO MOVE BYTE 0 TOR THIS 

:VERIFIES THAT THE PROPER BYTE WAS SELECTED AND THAT THE SIGN=X=TEND 
‘ea te “pet 0. 

THEN Q IS ant okt AND THE SAME PROCEDURE EXERCISES 
;THE LOGIC FOR. COMPL EMENTARY DAT 
$ THIS TEST EXERCISES UNIQUE MICROCODE. 


DAES OSSD IOISISISSIISISISISIIII I IIIIOIO IIE EE EERE ee eet ieee 
STEST 122 TEST MOV INSTRUCTION MODE 1,0 EVEN BYTE 
SIC IIRC ICICI IORI III II TORII OTRAS SAIS AI RASA AAA AA AIA AAAI AAAI NN A 
010312 005212 S122: (R2) :UPDATE TEST NUMBER 
000122 #122, (R2) :SEQUENCE ERROR? 
Ts123-10 :BR TO ERROR HALT ON SEQ ERROR 


[LOC 0=0 
‘LOC 0=177400 


R4=0 
iRG= 177777 
;R4=0 
[CHECK SIGN OF WORD 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 
000225 #225,-(R2) sMOVE TO MAILBOX # txexKeee 225 KkKKEKE 
-(R2) :SET MSGTYP TO FATAL ERROR 
;MOVB SHOULD SIGN X-TEND 
(RO) LOC 0=177777 
~: R4 :DO MOVB W/ EVEN BYTE 


123 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 757 
010362 012742 000226 #226,-(R2) [MOVE TO MAILBOX # xeuxxee 226 seeeeee 
010366 005242 =(R2) “SET MSGTYP TO FATAL ERROR 
010370 000000 [MOVB SHOULD SIGN X-TEND 
> OR SEQUENCE ERROR 
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69 
CJKDBB.P11 19=JUN=79 10:52 T122 TEST MOV INSTRUCTION MODE 1,0 EVEN BYTE SEQ 0069 

511 
sei) DR OIUIIIOIIIIOIDIOIIUIUIOIIIOUIOIII IIE IU REECE REE ERR ER EERE ERE EERE EERE RRR 
3513 : 
3514 ; THIS TEST VERIFIES MODE 1 DOP it seh tT r¥> 9 er: tee 

3515 : ODD BYTES. LOC. O IS SET TO 177400. RO IS T TO 0 AND R4 IS 

3516 ;SET TO 1. THE BISB INSTRUCTION USES THE BATT IN BYTE -% 10 SET BYTE 0. 

aE ; THE RESULT IS CHECKED BY INCREMENTING THE WORD (LOC. 0) TO ZERO. 
3519 | dnendoueeeinmiihbanenanrnipabiennnineiemanininntentnntiabieiimnmie De nnbidinidinneanent 
3520 sTEST 123 TEST MODE 1-ODD BYTE W/ DOP INSTS. 

3521 ta ioe 11: deter et eee ae ae re ee 
3522 010372 005212 1S123: INC (R2) ;UPDATE TEST NUMBER 

3523 010374 022712 000123 CMP #123,(R2) ; SEQUENCE ERROR? 

3524 010400 001010 BNE T8124=-10 ‘BR TO ERROR HALT ON SEQ ERROR 

3525 010402 005000 CLR RO ;RO=0 

3526 010404 005010 CLR (RO) ;LOC. 0=0 

3527 010406 005004 CLR R4 *RG= 0 
3528 010410 005204 INC RS :R4=1 

3529 010412 105114 COMB (R4) LOC. 0=177400 

3530 010414 151410 BISB (R4), (RO) ;TRY TO BIS LOW ORDER BITS W/ MODE 1 

3531 010416 005210 INC (RO) sCHECK RESULT 
3532 010420 001404 BEQ T8124 
3533 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 

534 ; CONDITIONAL BRANCH INST. AND <==== 

3535 s REPLACE THE MOVE INSTRUCTION <==== 

3536 : WHICH FOLLOWS W/ 767 <z2=2 

3537 010422 012742 000227 MOV #227,-(R2) sMOVE TO MAILBOX # **eeRKe 227 aeaKene 

3538 010426 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

3539 010430 000000 HALT SRESULT OF BISB INCORRECT 

3540 ; OR SEQUENCE ERROR 


CJKDB-8 wdir* CPU_DIAG. 
CJKDBB.P11 


010474 
010 
010502 


005212 


001404 


012742 
005242 


001404 


012742 
005242 
000000 


19=JUN=79 10:5 


000124 


000230 


000231 
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OOOO IIUIDIOIIIOISIDIDIOIOIOIOIOIOIIIOIOIIIOIIIOIISIIITITISIIIDIDIDIISIDIDIDIDIMIDIDIDIDISISISIDE Sint 


; THIS TESf VERIFIES MODE 2 DOP INSTRUCTIONS. LOC. QO IS SET TO <1. 
:RO IS CLEARED AND USED AS THE MODE 2 ADDRESSING REGISTER TO MOVE LOC. 0 
:18 Sbtenee DATA RESULTS ARE VERIFIED AND THE INCREMENTING OF THE REGISTER 


TTT TTITETITITITETILETTLET ETT TE TET TET TTT TTT TTT TTT TTT TTT TTT TTT 


sTEST 124 TEST MODE 2 W/ DOP INSTS. 
FI HII THK REE KEE ERE REE EERE EEE EERE ERE EERE KEE 
TS124: INC (R2) ;UPDATE TEST NUMBER 
CMP #124, (R2) ; SEQUENCE ERROR? 
BNE TS125-10 ;BR TO ERROR HALT ON SEQ ERROR 
CLR RO 7;RO=0 
CLR (RO) ;LOC. O0=0 
COM (RO) :LOC. 0=177777 
MOV (RO) +,R4 : TRY MOVE MODE 2,0 
INC R4 SCHECK R4 
BEQ DOP2 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
é CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
; WHICH FOLLOWS W/ 771 ¢€=z25 
MOV #230,-(R2) sMOVE TO MAILBOX # *xxeeexe 230 xeeenee 
INC -(R2) ;SET MSGTYP TO FATAL ERROR 
HALT “RESULT OF MOV INST INCORRECT 
DOP2: DEC RO sTEST RO AFTER MODE 2 


RO 
BEQ TS125 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS < 
° < 


é CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION (=== 
WHICH FOLLOWS W/ 762 (=== 
MOV #231,-(R2) “MOVE TO MAILBOX # *x*eeKKe 23] eekeeee 
INC -(R2) :SET MSGTYP TO FATAL ERROR 


HALT REGISTER NOT INCREMENTED IN MODE 2 
: OR SEQUENCE ERROR 
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CJKD8B.P11 19=JUN-79 10:52 7124 TEST MODE 2 W/ DOP INSTS. SEQ 007i 
3579 
3580 DOI III IIIIOIIIIIOIOIIOIUIOI TOTTORI IIIT TREE EEE EERE REE EERE EEE EERE 
3581 : 
3582 THIS TEST VERIFIES MODE 2 DOP BYTE INSTRUCTIONS WHICH ADDRESS 
3583 SEVEN BYTES. LOC. 0 IS SET TO -1. RO IS CLEARED AND USED AS THE 
3584 sADDRESSING ery IN A TEST WHICH TRIES TO CLEAR BYTE 1 USING 
3585 :BYT E 0 DATA AND A BICB. UNIQUE IN THIS TEST IS USE OF THE 
3586 : SAME ADDRESSING REGISTER FOR BOTH SOURCE AND DESTINATION. THE SOURCE AND 
seen :DESTINATION IS CHECKED TO INSURE PROPER FUNCTIONING. 
3589 + snadannsenhasensebnnetbieanennghenaneinnniadbinesabtbenanenedenebaiadinaesannanes 
3590 sTEST 125 TEST MODE 2 = EVEN BYTE W/ DOP INST. 
3591 FRI II III IOI TI TIT SCT TOTTI ICT TE TOIT TCT TE TOTO TO TOTO TOTTI TOTO TT TT EERE EERE EERE EE EEE 
3592 010504 005212 TS125: INC (R2) ;UPDATE TEST NUMBER 
3593 019506 022712 000125 CMP #125, (R2) ; SEQUENCE ERROR? 
3594 010512 001016 BNE T$126-10 7BR TO ERROR HALT ON SEQ ERROR 
3595 010514 005000 CLR RO 7;RO=0 
3596 010516 010010 MOV RO, (RO) ;LOC. O=0 
3597 010520 005110 COM (RO) ;LOC. 0=177777 
3598 010522 142010 BICB (RO) +, (RO) :TRY TO CLEAR BYTE 1 FROM BYTE O wW/ BICB 
3599 010524 105737 000001 TSTB av sCHECK RESULT 
3600 010530 001404 BEQ DOPB2A 
3601 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS €zzsz 
3602 é CONDITIONAL BRANCH INST. AND é€ss2= 
3603 ; REPLACE THE MOVE INSTRUCTION <==== 
3604 : WHICH FOLLOWS W/ 770 <=222 
3605 010532 012742 000232 MOV #232,-(R2) [MOVE TO MAILBOX # texxnne 232 xkkeeee 
3606 010536 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
3607 010540 000000 HAL T BICB DESTINATION INCORRECT 
3608 010542 105137 000000 DOPB2A: COMB av0 + CHECK BICB SOURCE 
010546 001404 BEQ 78126 
3610 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS (=== 
3611 r CONDITIONAL BRANCH iNST. <==== 
3612 : REPLACE THE MOVE INSTRUCTION <==== 
3613 : WHICH FOLLOWS W/ 761 <s=== 
3614 010550 012742 000233 MOV #233,-(R2) sMOVE TO MAILBOX # xeaneee 233 newnnee 
3615 070554 005240 INC -(R2) sSET MSGTYP TO FATAL ERROR 
3616 010556 000000 HAL T BICB SOURCE INCORRECTLY CHANGED 
3617 ; OR SEQUENCE ERROR 
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2 
C JKDBB.P11 19=JUN=79 10:52 1125 TEST MOLE 2 = EVEN BYTE W/ DOP INST. SEQ 0072 
%18 FERRER ARERR EEE EERE RRR ERE EERE EKER EE RREREEEERE REE REE 
319 : 
3620 é THIS TEST Sr tes MODE 2 DOP we aa 9 Nae WHICH REFERENCE 
3621 ay BYTES. RO IS SET LOC. 0 {s SET pha? nae R4 IS CLEARED. 
3622 A MODE 2 MOVB USES RO 19 move BYTE 1 TO -_ INCREMENT 
3623 :1S USED TO CHECK THAT THE PROPER BYTE WAS hoveD AND SIGN X=TENDED. 
3625 TITISIITTIIITITITITTTTTTTTTITITTTTTTTTTITITTTTTITTTTTTTT TTT TT TTT TTT TTT TTT TTT TTT 
3626 STEST 126 TEST MODE 2 = ODD BYTE W/ DOP INST. 
3627 FERRER REE REE REE REE REE REE ERE E RARE REE REE ED 
3628 010560 005212 15126: INC (R2) ;UPDATE TEST NUMBER 
3429 010562 022712 000126 CMP #126, (R2) Fo ey ERROR 
3630 010566 001017 BNE 1S$127=10 ‘BR T O ERROR HALT ON SEQ ERROR 
3631 010570 005000 CLR RG 7;RO=0 
3632 010572 005004 CLR R4 ae “y 
3633 010574 005010 CLR (RO) . 0=0 
3634 010576 005110 COM (RO) tot: 0=177777 
3635 010600 105120 COMB (RO) + TLOC O= 177400; RO=1 
3636 010602 112004 MOVB @0)+,R4 ;TRY DOP MODE 2 W/ ODD BYTE 
3637 010604 005204 INC © RS ;CHECK RESULT OF MOVB 
3638 010606 001404 BEQ DOPB2B 
3639 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <z=s=2 
3640 ; CONDITIONAL BRANCH INST. AND ¢===2 
3641 J REPLACE THE MOVE INSTRUCTION <==== 
3642 , . WHICH FOLLOWS W/ 767 <==== 
3643 010610 012742 000234 MOV #234 ,-(R2) sMOVE TO MAILBOX # xeeanee 254 tannnnn 
3644 010614 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
3645 010616 000000 HAL T RESULT CF MOVB INCORRECT 
3646 010620 005740 - DOPB2B: TST -(RO) ;BUMP RO DOWN BY 2 
3647 010622 905700 TST RO CHECK RO 
3648 010624 001404 : BEQ 1$127 
3649 : 10 SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢=222 
3650 Z CONDITIONAL BRANCH INST. AND <€==s2 
3651 ; REPLACE THE MOVE INSTRUCTION <==== 
3652 . : WHICH FOLLOWS W/ 760 <aaz2 
3653 010626 012742 000235 MOV #235,-(R2) sMOVE TO MAILBOX # eeeeee 2355 xennene 
3654 010632 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
3655 010634 000000 HAL T :MODE 2 BYTE DID NOT INCREMENT REG. CORRECTLY 


3656 ; OR SEQUENCE ERROR 
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FRA EAA E RARER RARER EERE EERE ERE ERAEEEET ERE EERE RETA 


E 3 BIS 18 USED TO SET RO 
. Fag USING LOC. 0 AS THE SOURCE TO BIS THE ZEROES is ee THE 
RESULT Is” TESTED BY INCREMENTING RO AND CHECKING FOR ZERO 


OUTTITETITTTETILITITE LOTTE TTETE LETTE TTTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT 


“TEST 127 TEST MODE 3 W/ DOP INSTS. 
a. ie an | Te mente teat Gene ee 
1$127: ZUPDATE TEST NUMBER 
000127 C no? (R2) ; SEQUENCE ERROR? 
TS130-10 TO ERROR HALT ON SEQ ERROR 
052525 000000 #052525 ,a#0 ‘ROVE 52525 TO LOC. 0 
2 #125252.RO [SET ALT. ONE AND ZERO IN RO 
a#0,RO ‘TRY TO SET ALL OTHER BITS W/ MODE 3 
‘TEST RESULT 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 766 
012742 #236 ,-(R2) :MOVE TO MAILBOX # seexxee 236 sxenees 
005242 % -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 BIS W/ MODE 3 INCORRECT RESULT 
: OR SEQUENCE ERROR 


. 
SERRA EER ERE EERE ERE REAR EEE EEE RRR EERE eee 


THIS TEST VERIFIES MODE 3 DOUBLE OPER4ND BYTE INSTRUCTIONS WHICH 
“ADDRESS EVEN BYTES. BYTE QO IS SET TO ALTERNATING 1°S AND O'S; BYTE 1, 
sALTERNATING 0°S AND 1°S. RO IS CLEARED AND A BISB IS USED TO 
SET THE LOW BYTE OF RO TO 252. 


* 
FURR AREER EEE EERE REE EERE RARER EERE EAE EEE REE REAR Eee 


TEST 130 TEST MODE 3 ~ EVEN BYTE W/ DOP INSTS. 
FEAR A ERATE EAE EERE EERE REREEREREEREREREER ERE ERE eee ee 
75130: (R2) [UPDATE TEST NUMBER 
000130 #130, (R2) [SEQUENCE ERROR? 
T$131-10 ;BR TO ERROR HALT ON SEQ FRROR 
052652 #52652,a#0 :NOVE 1°S AND 0° PATTERN TO LOC. 0 


=0 
000000 a#0 ,RO : TRY RO=252 W/ MODE 3 - EVEN BYTE 
000252 #252,R0 ;BISB W/ EVEN BYTE SUCCESSFUL? 


1S131 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE ae INSTRUCTION 
: WHICH FOLLOWS W/ 766 
010732 012742 #237,-(R2) sMOVE TO MAILBOX # tive g 237 tenenee 
010736 005242 ~(R2) :SET MSGTYP TO FATAL ERROR 
010740 000000 :BISB w/ MODE 3 ~ EVEN BYTE FAILED 
; OR SEQUENCE ERROR 


RO 
TS130 


veut 
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C JKDBB.P11 


010742 


010772 


010774 
011000 
011002 





19=JUN=79 10:52 1150 TEST MODE 3 = EVEN BYTE W/ DOP INSTS. SEQ 0074 


PPAR AAA AAA AA ARERR AAA EA ERRATA ARERAAAERAERERAAHEREHEEARE REAR ERRE HET R EAA e 


THIS TEST VERIFIES MODE 3 DOUBLE OPERAND BYTE INSTRUCTIONS 
WHICH ADDRESS ODD BYTES. THE SAME PROCEDURE USED IN PREVIOUS 
TEST IS USED HERE. THIS TIME oye 1 IS USED AS THE SOURCE BYTE. 
: THE EXPECTED RESULT IS: R80 = 125. 


PITITIIIIIITITITITITITITI LITT LITTTT TILT TiLitiii irri titi tiiiiiiiiiTT Tee 


STEST 131 TEST MODE 3 = ODD BYTE w/ DOP INSTS. 
FRR AEA AAA AAR AAA EEE RAE RARERREAE REET ORAREARAEEREEERRRARRAREEREERERAEERARREER ERE REED 
1S131: (R2) ZUPDATE TEST NUMBER 
000131 #131, (R2) : SEQUENCE ERROR? 
15132=10 TO ERROR HALT ON SEQ ERROR 
052652 000000 #52652,aN0 ‘ROVE 1°S AND 0'S PATTERN TO LOC 0 


*RO=0 
000001 av RO :TRY RO=152 W/ MODE 3 = ODD BYTE 
000127 MP #125,RO tRO=125? 


18132 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


iu 
“om ot tt 


AAAA 
wun tt 


REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 
012742 MOV #240,-(R2) “MOVE TO MAILBOX # prey 240 saaanee 
005242 INC -(R2) ;SET MSGTYP TO FATAL ERR 
000000 HALT ;BISB W/ MODE 3 - ODD BYTE FAILED 
; OR SEQUENCE ERROR 


FRAT RRE ARERR EEE REAR REEREEAEERERER REE EEEREE REET ERE REE EE 


STEST 132 TEST DEST. MODE O-BYTE W/ DOP NON-MODIFYING MST 
Mata eee RRR RRR RRR ESE R RRR RRR RSS SERRE RRR SR ESS RSE SSS ESE RES EE ESSEC ESE SSS ESSA ES SY 
15132: INC (R2) :UPDATE TEST NUMBER 

CMP #132, (R2) S SEQUENCE ERROR? 

BNE 15135-10 BR TO ERROR HALT ON SEQ ERROR 


RO= 377 
SET C AND V BITS 
:TRY DOPNM DEST. MODE O-BYTE 


‘BR TO ERROR IF C BIT CLEAR. 


: TO SCOPE: hey THE RIGHT BYTE OF THIS 
: ONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 766 


012742 #241,-(R2) ;MOVE TO MAILBOX # *eeeeee 24] eeeeene 
005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 3CC°S INCORREC 

> CHECK DESTINATION DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 760 
012742 #2642,-(R2) : MOVE TO MAILBOX #@ seeenae O40 aeennes 


"wou u 
tt ee 
uuu 


“uuu 


NAAA 


RO 
18133 
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11056 005242 INC =(R2) ;SET MSGTYP TO FATAL ERROR 
11060 000000 HALT ;DEST. DATA MODIFIED 
: OR SEQUENCE ERROR 


FERRARA EEA RARER REAR A ERR RERAREREREREEEREEEEREAERRERAAEEAERE EERE REE Ree 


TTEST 133 TEST DEST. MODE 1 W/ DOP NON-MODIFYING INST 
SERRE REE EER EEE 
005212 75133: (R2) :UPDATE TEST NUMBER 
000133 #133, (R2) SEQUENCE ERROR? 
13134-10 BR TO ERROR HALT ON SEQ ERROR 


(RO) :LOC. 0=0 
:CLEAR C BIT 
177777 #177777, (RO) [TRY DOPNM DEST. MODE 1 
DNM1A ;BR TO ERROR IF N BIT SET 
:BR TO FRROR IF V BIT SET 
;BR TO ERROR IF C BIT SET 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


012742 000243 #243,-(R2) :MOVE TO MAILBOX # *eaxnee 243 aeenene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 H. :COND. CODES INCORRECT 

005710 : (RO) CHECK TEST DATA 


001404 T8134 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 760 
012742 000244 #244 ,-(R2) “MOVE TO MAILBOX # *eeeeeH 244 eeeKene 
-(R2) :SET MSGTYP TO FATAL ERROR 
SDESTINATION DATA MODIFIED 
; OR SEQUENCE ERROR 


FARRER REED ERR ERR EKER REE ERE REE EEE EERE EKEREREEE REED 


STEST 134 TEST DEST, MODE 2 W/ DOP NON-MODIFYING INST. 
jsssecenecetenauenceessesteensesnecouonnescasesacessoeosseraqsuessoseneseesqenesouent 
1S134: (R2) ;UPDATE TEST NUMBER 
000134 #134, (R2) :SEQUENCE ERROR? 
an -10 :BR- TO ERROR HALT UN SEQ ERROR 


eleolelelelelelelelelo) 
ee eed ed ceed ee ed eed eed ed ed 
ee ed ed eed ed ed 
= Se SSSSE8 
SIN NN 
RRSSRVSER 


=_d od 
NO 


001404 


AAAA 
“iuiudt 
funn 


(RO) st LOC. 0=0 
#125252, (RO) :LOC. 0=125252 
#77777, (RO)+ TRY DOPNM INST W/ MODE 2 
DNM2A :BR TO ERROR IF V BIT SET 
BR TO ERROR IF Z-BIT SET 


leleleleleloelelelele) 
pa ar er Pr Pe Pe Pe Pe Po PF 
aod cal a aa cath adh aed cae anal 
tk aad an an ae ed eh an od ai 
~S Qumn BBL 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


012742 000245 ; #245,-(R2) :MOVE TO MAILBOX # «eaexee 245 exenees 


See EEE EEE 
WOOwAWnHSWro-O 


lw 
SS 
-o 
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CJKDBB.P11 
011176 


005242 
000000 


005300 
005300 
001404 


012742 
005242 
000000 
022710 
001404 


012742 
005242 
000000 


012742 
005242 
000000 
005300 
001404 


012742 
005242 
000000 


000246 


125252 


000247 


000135 


052652 
000201 


000250 


000251 


L 6 
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TEST DEST, MODE 2 W/ DOP NON-MODIFYING INST. SEQ 0076 


SET MSGTYP TO FATAL ERROR 
COND. CODES INCORRECT 
sDECREMENT RO TO CHECK IT. 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 757 


#246,-(R2) sMOVE TO MAILBOX # *heenee 246 teennne 
-(R2) :SET MSGTYP TO FATAL ERROR 

;MODE 2 REGISTER NOT INCREMENTED BY 2 
rece CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 750 
#247,-(R2) sMOVE TO MAILBOX # *eeeRHe O47 KaKKH HR 
-(R2) :SET MSGTYP TO FATAL ERROR 

:DEST. DATA MODIFIED 

: OR SEQUENCE ERROR 


JDO IOIUISIOIIIOIIISISIDIDIDIOIDIDIOIOIOIDIOIDIDIOIIOIOIOIOIOIOIIOI III III ITT OTTO IIIT IIIT IIIIII ICICI IOI tet 
TEST 135 TEST DEST. MODE 2-BYTE, W/DOP NON-MODIFYING INST 
JOUR IIIS ICICI IOUT OIRO ITT TTI AAIISAAA AAAI AISIII IASI A ANAS AA 
T8135: (R2) ;UPDATE TEST NUMBER 

#135, (R2) ;SEQUENCE ERROR? 

it: a fo ERROR HALT ON SEQ ERROR 


AAAA 


(RO) :LOC. 0=0 
#52652, (RO) ;LOC. 0=52652 
V sSET C AND V BITS 
#201, (RO)+ 3s TRY DOPNM INST. W/ MODE 2 EVEN BYTE 
NMB2A [BR TO ERROR IF Z-BIT SET 
7BR TO ERROR IF C-BIT CLEAR 
7BR TO ERROR IF V-BIT SET 


" 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS wW/ 764 


#250,-(R2) sMOVE TO MAILBOX # skexeee 250 seenene 
-(R2) :SET MSGTYP TO FATAL ERROR 

COND. CODES INCORRECT 
RO CHECK DEST. REGISTER. 


DNMB2C 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE [ eatin 


WH 
#251,-(R2) “MOVE TO MAILBOX eeeneee 
-(R2) 7SET MSGTYP TO FATAL ERROR 
:DEST. REGISTER NOT INCREMENTED BY 1 


“Heidi u 
Vout 

foun tu 
nuiwn 
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011320 
011322 


EESE 


011370 
011374 
011376 


011412 


HSHRHRHKRHKHKHKEKHKHS 
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005242 
0000 


001404 


012742 
005242 
000000 
022710 
001404 


012742 


009201 


000252 


000253 


052652 


000254 


000136 


125125 


000201 


MACY11 30A(1052) 
1135 


DNMB2C : 


DNMB2D : 


DNMB2E : 


DNMB2F : 


ey 11: 
TEST DEST. MODE 


0 "PAGE 77 
2-BYTE, W/DOP NON-MODIFYING INST 


RO = 

#201, (RO)+ Y DOPNM INST. -_ 2-ODD BYTE 
DNMB2D ;BR TO ERROR IF Z-BIT SET 

DNMB2L ;BR TO ERROR IF V=BIT SET 


DNMB2E 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 744 


#252,-(R2) sMOVE TO MAILBOX # teeeeee 252 teanene 

-(R2) :SET MSGTYP TO FATAL ERROR 

:COND. CODES INCORRECT 

" :DEC RO TO CHECK IT. 

DNMB2F 

: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 735 
sMOVE TO MAILBOX # *xeKeee 2535 xeeKKER 
2 SET MSGTYP TO FATAL ERROR 

DEST. REGISTER NOT INCREMENTED BY 1 
7CHECK DEST. DATA IS UNMODIFIED 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 726 
#254 ,-(R2) sMOVE TO MAILBOX # *kxeeee 254 xeeeeee 
~(R2) :SET MSGTYP TO FATAL ERROR 

:DEST. DATA WAS MODIFIED. 

: OR SEQUENCE ERROR 


#253,-(R2) 
-(R2) 


#52652, (RO) 
TS136 


AAAA 


SEQ 0077 


DKK KKK KKK KEKE KEK KEKE EEK EEE EERE KEE ER 


TTEST 136 


aa. md. wa meee Set oe ee 


TS136: 


TEST DEST. MODE 3-BYTES W/DOP NON-MODIFYING INST. 


(R2) :UPDATE TEST NUMBER 

#136, (R2) SSEQUENCE ERROR? 

ia *BR TO ERROR HALT ON SEQ ERROR 
;LOC. O=0 

#195125, (ROD TLOC. 0=125125 

RO *RO=377 

RO ;RO=400 

(RO) *LOC. 400=0 

V C-BIT=V-BI T=1 

#201,a(RO)+ :TRY DOPNM W/MODE 3-EVEN BYTE 

DNMB3A ‘BR TO ERROR IF 2 BIT SET 

DNMB3A [BR TO ERROR IF V BIT SET 

DNMB3A 7BR TO ERROR IF C BIT CLEAR 

DNMB3B 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 


: REPLACE THE MOVE INSTRUCTION 


AAA 
“aud 
wu 
“weoueat 
“ou 
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Ps WHICH FOLLOWS W/ 761 
DNMB3A: 


012742 000255 MO #255,=(R2) sMOVE TO MAILBOX # saeaawe 255 xeenene 
005242 -(R2) 7SET MSGTYP TO FATAL ERROR 

000000 :COND. CODES INCORRECT 

022700 000402 DNMB3B: CMP #402,R0 :CHECK DEST. REGISTER INC. BY 2 AND INC BY 2 


001404 DNMB3C 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 752 
012742 #256,-(R2) ‘MOVE TO MAILBOX # sewed 256 teeeeee 
005242 ~(R2) ‘SET MSGTYP TO FATAL ERROR 
000000 [DEST. REGISTER NOT INCREMENTED BY 2 
005200 : RO *RO=404 


005200 INC RO 

132730 000201 #201, a(RO)+ i TRY DOPNM DEST MODE 3-BYTE (ODD) 
001402 E DNMB 3D BR TO ERROR IF Z BIT SET 

102401 “BR TO ERROR IF V BIT SET 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 737 


012742 000257 ‘ #257,-(R2) :MOVE TO MAILBOX # xexeeee 257 ceeeene 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
060000 : COND. CODES INCORRECT 


005004 : R4 tR4= 
022714 125125 #125125,(R4) CHECK DEST. DATA 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE a INSTRUCT ION 
: WHICH FOLLOWS W/ 727 
012742 #260,-(R2) sMOVE TO MAILBOX # xxexxxe 260 xeanene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :DEST. DATA MODIFIED 
: OR SEQUENCE ERROR 


AOR III OIC UIOIOIOIOIIOIOIOI IOI OIIOI OI ITI TOT TOT TTT AAAS SIISISIIAISISAIIAI AISI AANA ANA A AA 
STEST 137 TEST DEST. MODE 4 W/DOP NON-MODIFYING INST. 
o> aetna +> pa deaniaade ty Oe Be == amy alata 
1$137: (R2) sUPDATE TEST NUMBER 
000137 #137, (R2) : SEQUENCE ERROR? 
TS140-10 :BR <0" ERROR HALT ON SEQ ERROR 


10 
10 
14 
16 
20 
22 
26 


(RQ) . 0=0 
125252 #125252, (RO) :10C: 0=125125 
#2,R0 =2 


000002 
:SET ALL coe. CODE BITS 
020000 #20000 ,-(RO) RY DOPNM W/ MODE 4 
DNM4A ‘BR TO ERROR IF N-BIT SET 
:BR TO ERROR IF V-BIT SET 
7BR TO ERROR IF C-BIT CHAR 
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; TO sCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCi ION 
WHICH FOLLOWS W/ 762 


012742 000261 MO #261,-(R2) sMOVE TO MAILBOX # *eeeee 26] xeeenne 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

0C0000 H ;COND. CODES INCORRECT 

005700 : RO ;CHECK DEST. REGISTER 


001404 B DNM4C 
; TO SCOPE: CLEAR THE RIGHT ~t OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 754 
012742 000262 #262 ,-(R2) ;MOVE TO MAILBOX # *xxKeee 262 xhennen 
005242 -(R2) :SET MSGTYP TO FATAL ER 


ROR 
000000 H DEST. REGISTER NOT DECREMENTED BY 2 
022737 125252 000000 : + aaa CHECK DEST. DATA 


001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <= 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 744 

012742 3 MOV #263,-(R2) sMOVE TO MAILBOX # *keaeee 2635 KeKKKED 

005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

000000 HALT :DEST. DATA MODIFIED 
: OR SEQUENCE ERROR 


FIR KERRI KKK IKKE KEKE REE EEK EKEKEEREEEE KE HEE 
TEST 140 TEST DEST. MODE 4-BYTE W/ DOP NON-MODIFYING INST. 
Seciie Gar Gee | es ee Vee eaten oe oe re 
005212 7S140: (R2) UPDATE TEST NUMBER 
000140 #140, (R2) SEQUENCE ERROR? 
T$141-10 :BR TO ERROR HALT ON SEQ ERROR 


(RO) :LOC. 0=0 
052652 #52652, (RO) :LOC. 0=52652 
000002 #2,R0 RO=2 
:COND. CODES=0 
000201 #201,-(RO) TRY DOPNM INST W/MODE 4 ODD BYTE 
DNMB4A :BR TO ERROR IF V BIT SET 
DNMB4A ;BR TO ERROR IF Z BIT SET 
DNMB4A :BR TO ERROR IF C BIT SET 
DNMB4B 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 762 


000264 #264 ,-(R2) sMOVE TO MAILBOX # *kexxee 264 teeeeee 
-(R2) 7 SET tage 28 TO FATAL ERROR 
H [COND. CODES INCORRECT 
000001 : CMP #1 ,RO CHECK DEST. REGISTER 


001404 B DNMB4 C 
:; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


AA 
“ou 


AAAA 


“un 
“une 





CJKDB=B DCF11=AA CPU_DIAG. 
CJKDBB.P11 19=JUN=79 10:52 


012742 
005242 
000000 
132740 


001401 
100404 


4048 5 000265 


117. 
04 117 
4050 011 
117 
1174 
1174 


26 
32 
734 
8 000201 
44 


5 
oO 
Vw 
nm 
ooo 


012742 
005242 
000 


000 
005700 
001404 


000266 


012742 
005242 
000000 
022710 
001404 


000267 


052652 


012742 
005242 
000000 


000270 


000141 


100000 
000402 


100000 


01 
012050 


MACY11 30A(1052) 
7140 


DNMBSC: 


DNMB4D: 


DNMBCE : 


DNMBGF : 


19=JUN=79 


. € 
11:08 PAGE 


80 
TEST DEST. MODE 4=-BYTE W/ DOP NON-MODIFYING INST. 
; REPLACE THE “yee INSTRUCTION 
; WHICH FOLLOWS W/ 753 
#265,=-(R2) sMOVE TO MAILBOX # ocesere, 265 tkkeKee 
-(R2) SET MSGTYP TO FATAL ERROR 


:DEST REG. NOT Dg te BY 1 


#201,=-(RO) :TRY_DOPNM INST. W/MODE 4 EVEN BYTE 
ater ;BR TO ERROR IF 2=BIT SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 743 


sMOVE TO MAILBOX # xxexeee 266 
:SET MSGTYP TO FATAL ERROR 
COND. CODES INCORRECT 

RO CHECK DEST. REGISTER. 


DNMB4F 

: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 735 
:MOVE TO MAILBOX # *eeexee 267 
:SET MSGTYP TO FATAL ERROR 
;DEST. REG. NOT DECREMENTED BY 1 
CHECK DESTINATION DATA 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 726 

“MOVE TO MAILBOX # sxxxxxe 270 

:SET MSGTYP TO FATAL ERROR 

SDEST. DATA MODIFIED 

: OR SEQUENCE ERROR 


RRKKKKK 


#266,-(R2) 
-(R2) 


REKKKKK 


#267 ,-(R2) 
-(R2) 


#52652, (RO) 
TS141 


ReKKKKEK 


#270,-(R2) 
-(R2) 


AAAA 
iunu 
uw uw 
nnunu 


AAAA 
nuiuu 


AAAA 
“udu 
iuwu 
nn uw 


SEQ 0080 


DI III IKKE RAKE KEE EERE ERE REE REE EEEEEEEEEREREKEEE 


TEST 141 


II KI I IKKE RR E RE RERREKEEEREKEREEERER ER EREEEREREK EEE 


TS141: 


INC 


TEST DEST MODE 5 W/DOP NON-MODIFYING INST. 


;UPDATE TEST NUMBER 


(R2) 
#141, (R2) SEQUENCE ERROR? 


Tsi142-10 :BR {0 ERROR HALT ON SEQ ERROR 
(RO) “LOC 0=0 
#100000,(RO)  :LOC. 0=100000 
#402,R0 *RO=2 

:SET ALL COND. CODE BITS 
#100000,a-(RO) :TRY DOPNM W/MODE 5 
DNMSA ‘BR TO ERROR IF V-BIT SET 
DNMSA [BR TO ERROR IF C-BIT CLEAR 
DNMSA [BR TO ERROR IF 2-BIT SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 762 


AAAA 
oununu 


nun 
“wine 
“von 
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012052 DNM5SA: 
012742 000271 MOV #271,-(R2) MOVE TO MAILBOX # sexxeee 27] KeeKHEe 
005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
000000 HALT :COND, CODES INCORRECT 
022700 000400 DNMSB: CMP eee CHECK DEST. REGISTER 


001404 BEQ 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 753 
012742 000272 MOV #272,-(R2) sMOVE TO MAILBOX # *kxeKee 272 KeKKKEE 
INC -(R2) SET MSGTYP TO FATAL ERROR 
HALT DEST. REGISTER NOT + * gente BY 2 
100000 000000 DNMSC: CMP e- CHECK DESTINATION DATA 


BEQ 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 743 
012742 000273 MOV #273,-(R2) sMOVE TO MAILBOX # *keKeee 273 KHKKKHR 
005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
000000 HALT :DEST. DATA INCORRECTLY MODIFIED 
: OR SEQUENCE ERROR 


AAAA 
nuuu 


RRABRARLAL 
— oS es 
ee ed eed dd ed 
OONAULRW 


AAAA 
“uu 
ine 


DI I IKI I IK IKK IK IKK KERR REE KEKE KEEKEKKKKEKEEE 


STEST 142 TEST DEST. MODE 6 W/DOP NON-MODIFYING INST. 
5 KKK EERE KEKE REE RK EERE KEKE EE 
005212 TS142: (R2) ;UPDATE TEST NUMBER 
000142 C #142, (R2) :SEQUENCE ERROR? 
T$145-10 :BR ve ERROR HALT ON SEQ ERROR 


(RO) 
000001 #1, (RO) 
OM R 
000001 000001 #1,1(RO) 
DNM6A 


DNM6A ; 
DNM6A ;BR TO ERROR IF C-BIT CLEAR 


DNM6B 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


012742 000274 #274 ,-(R2) sMOVE TO MAILBOX # *exxxee 274 Keenene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 :COND CODES INCORRECT 

022700 177777 : #-1,R0 : CHECK DEST. REGISTER 


001404 DNM6C 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 754 
012742 000275 #275,-(R2) “MOVE TO MAILBOX # sexxwee 275 waeennee 
005242 -(R2) 3SET MSGTYP TO FATAL ERROR 
000000 :DEST. REGISTER MODIFIED 


AAAA 
“oud t 
“iwi 
nun 
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012206 022737 000001 000000 DNM6C: CMP #1,a40 CHECK DEST. DATA 


012214 001404 BEQ T8143 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
é REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 744 

012216 012742 000276 MOV #276,-(R2) sMOVE TO MAILBOX # *keeeee 276 xeenene 

012222 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

012224 HALT :DEST. DATA MODIFIED 
: OR SEQUENCE ERROR 


FERRE RRR REE KEE KERR REE ERE ERE EEE REE EERE EERE EEE EERE EERE Ee 
TEST 143 TEST DEST MODE 7 W/DOP NON-MODIFYING INST. 
DRE REE REE EERE REE ERR REE EERE E EERE EERE K ERR ERE 
012226 75143: (R2) ;UPDATE TEST NUMBER 
000143 C #143, (R2) SEQUENCE ERROR? 
Ts144-10 ;BR TO ERROR HALT ON SEQ ERROR 


- 0=0 C-BIT=0 
0=125125 


DOPNM W/MODE 7 

‘BR TO ERROR IF V-BIT SET 
;BR TO ERROR IF N-BIT SET 
:BR TO ERROR IF C-BIT SET 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 762 


012742 000277 #277,-(R2) sMOVE TO MAILBOX # ‘*aeaeee 277 tenenne 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 :COND. CODES INCORRECT 

022700 000091 : (CMP #1,R0 CHECK DEST. REGISTER 


001404 DNM7C 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 753 

012742 000300 #300,-(R2) MOVE TO MAILBOX # seexane 300 teennne 

005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 H, [DESTINATION REGISTER MODIFIED 

125125 000000 DNM7C: a A 5 a CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 743 

000301 #301,-(R2) “MOVE TO MAILBOX # teeenwe 30] eeneeee 
-(R2) SET MSGTYP TO FATAL ERROR 
DEST. DATA INCORRECT 
; OR SEQUENCE ERROR 


PRA RRA REERAEERAAEREAR ERR REE ERE K eee eee eee eeeeeee 


(RO) Hy 
125125 #125125, (RO) tT f° 
000001 BIS #1,RO :RO=1 
000125 0600403 #125,a8403(RO) Y 
B DNM7A 


AAAA AAAA 
nue 
nuwdu 


AAAA 
nun 





CJKDB=B DCF11=AA CPU_DIAG. 
CJKDBB.P11 19=JUN=79 10:52 


005212 


aecate 000144 


000302 


012400 


012402 012742 
012406 005242 
012410 000000 


000303 


005212 
000145 


102401 


MACY11 30A(1052) _19=JUN=79 
7143 
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TEST DEST MODE 7 W/DOP NON-MODIFYING INST. 


THIS TEST VERIFIES THE MOV DESTINATION MODE 1 INSTRUCTION, 
“DATA IS SET IN RO USING SOP mi AND THEN MOVED TO LOC. 0 


: USING MOV SRC MODE 0, DEST. 


SEQ 0083 


UTTIITITITIIITITITITITITITITTITITTTTITTTTTTTTTT TTT LTTE TTT LTTE TTT TTT TTT eet 


TEST MOV DESTINATION MODE 1 


aie ae ts aa. eee GREE Mao ae Coe ce re oe ee 


STEST 144 
1S144: INC (R2) 
CMP #144, (R2) 
BNE 7$145-10 
CLR RO 
CLR (RO) 
COM RO 
CLR R4 
MOV RO, (R4) 
BVS MDM1A 
BEQ MDM1A 
BM] MDM1B 
MDM1A: 
MOV #302,-(R2) 
INC -(R2) 
HALT 
MDM1B: TST RG 
BEQ T8145 
MOV #303,-(R2) 
INC -(R2) 
HAL T 


UPDATE TEST NUMBER 
SSEQUENCE ERROR? 
7BR f° ERROR HALT ON SEQ ERROR 


;RO= 

;LOC. 0=0 

;RO=- 

3R4 POINTS TO Lo; 0 


TRY MOVE MODE 
7BR TO ERROR IF V SET 
:BR TO ERROR IF Z SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


sMOVE TO MAILBOX # *kxxaxe 302 
;SET MSGTYP TO FATAL ERROR 
CONDITION CODE NOT CORRECT 


REKKKKK 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


: WHICH FOLLOWS W/ 761 
sMOVE TO MAILBOX # *xxexee 303 
:SET MSGTYP TO FATAL ERROR 
:DESTINATION REGISTER INCORRECTLY ALTERED 

: OR SEQUENCE ERROR 


REKKEKEK 


AAAA 
uuu 


FERRER REE RRR ERE ERE ERE EEEEEKEER KEE e 


THIS TEST VERIFIES THE MOV DESTINATION MODE 2 INSTRUCTION. 


DATA IS SET IN RO USING SOP INSTRUCTIONS AND THEN MOVED 
TO LOCATION 0 USING MOV SRC MODE 0, ° 


SEERA REE A RE KREEEE RK EREKEEREEREREEEARE EERE 


TEST MOV DESTINATION MODE 2 


DEST. MODE 1 


FREAK RRR EEA ee 


TEST 145 

TS145: INC (R2) 
CMF #145, (R2) 
ENE 1$146-10 
CLR RO 
CLR R1 
CLR (RO) 
COM (RO) 
MOV R1,(RO)+ 
BM! MDM2A 
Bvs MDM2A 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
:BR - ERROR HALT ON SEQ ERROR 
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C JKDBB.P11 19=JUN-79 10:52 7145 TEST MOV DESTINATION MODE 2 SEQ 0084 
m 38 012440 001404 BEQ MDM2B 
4271 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
4272 3 CONDITIONAL BRANCH INST. AND <==== 
4273 s REPLACE THE MOVE INSTRUCTION <==== 
4274 : WHICH FOLLOWS W/ 767 <ss22 
4275 012442 MDM2A: 
4276 012442 012742 000304 MOV #304,-(R2) sMOVE TO MAILBOX # <«<teenee 304 seennne 
4277 012446 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
4278 012450 000000 HALT :CC°S INCORRECT 
4279 012452 005300 MDM2B: DEC RO 
4280 012454 005300 DEC RO 
4281 012456 001404 BEQ MDM2D 
4282 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
4283 3 CONDITIONAL BRANCH INST. AND <s==2 
4284 3 REPLACE THE MOVE INSTRUCTION <==== 
4285 3 WHICH FOLLOWS W/ 760 <s==== 
4286 012460 MDM2C : 
4287 012460 012742 0003C5 MOV #305,-(R2) sMOVE TO MAILBOX # *aeeee 305 xeennnn 
4288 012464 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
4289 012466 000000 HAL T sDESTINATION REGISTER NOT INCREMENTED PROPERLY 
4290 012470 005737 000000 MDM2D: TST aro 
4291 012474 001404 BEQ T8146 
4292 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
4293 : CONDITIONAL BRANCH INST. AND <==== 
4294 : REPLACE THE MOVE INSTRUCTION <==== 
4295 ; WHICH FOLLOWS W/ 751 <=s== 
4296 012476 012742 000306 MOV #306,-(R2) sMOVE TO MAILBCX # *exxxee 306) xxnnnee 
4297 012502 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
4298 012504 000000 HALT = DESTINATION DATA INCORRECT 
ry 44 ; OR SEQUENCE ERROR 
4301 FO RRR ER RRR RE KK EKER KERR EERE ERE EEK EERE KEKE EERE KEEEEKEKERE ERE 
4302 3 
4303 : THIS TEST VERIFIES DESTINATION MODE 2 W/MOVB INSTS. TWO DIFFERENT MOVB 
tae ; INSTRUCT IONS ARE USED TO MOVE A TEST PATTERN FIRST TO BYTE O THEN TO BYTE 1. 
4306 PUTTITTISTI TIT T TTT TITTT TTT TT TTT TTT TTT TTT TTT TT ETT TTT ETT TTT TTT TTT TTT TTT 
4307 S TEST 146 TEST MOV-BYTE DESTINATION MODE 2 
4308 SRR KK KERR KK RRR RIKER KEKE KEE KEE EKEKKEEEREEREKREKKE RE 
43 012506 005212 7S146: INC (R2) ;UPDATE TEST NUMBER 
4310 012510 022712 000146 CMP #146, (R2) + SEQUENCE ERROR? 
43171 012514 001046 BNE TS147-10 :BR TO ERROR HALT ON SEQ ERROR 
4312 012516 005000 CLR RO RO=0 
4313 012520 005010 CLR (RO) LOC. 0=0 
4314 012522 112720 000125 MOVB #125, (RO)+ ;TRY DESTINATION MODE 2 W/EVEN BYTE 
4315 012526 102402 BVS MBDM24 ‘BR TO ERROR IF V SET 
4316 012530 001401 BEQ MBDM2A ;BR TO ERROR IF 5 SET 
4317 012532 100004 BPL MBDM2B 
4318 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
4319 : CONDITIONAL BRANCH INST. AND <==== 
4320 : REPLACE THE MOVE INSTRUCTION <==== 
4321 ; WHICH FOLLOWS wW/ 770 ¢z=22 
4322 012534 MBDM2A: 
4323 012534 012742 000307 MOV #307,-(R2> sMOVE TO MAILBOX # «xxewee 307 wanvene 
4324 012540 005242 INC -(R2) 3SET MSGTYP TO FATAL ERROR 
4325 012542 000000 HALT :CC°S INCORRECT 


CJKDB=B DCF11=AA CPU_DIAG. | 
19=JUN=79 10:52 


CJ 


KDBB.P11 
4326 012544 
4327 012550 
4328 

4329 

4330 

4331 

4332 012552 
4333 012556 
4334 012560 
4335 012562 
4336 012566 
4337 072570 
4338 012572 
4339 

4340 

4341 

4342 

4343 012574 
4344 012574 
434° 012600 
4346 012602 
4347 012604 
4348 012610 
4349 

4350 

4351 

4352 

4353 012612 
4354 012616 
4355 012620 
4356 012622 
4357 012630 
4358 

4259 

4360 

4361 

436c 012632 
4363 012636 
4364 012640 
4365 

4366 

4367 

4368 

4369 

4370 

4371 

4372 

4373 

4374 

4375 012642 
4376 012644 
4377 012650 
4378 012652 
4379 012656 
4380 012660 
4381 012664 


022700 
001404 


012742 
2 


012742 
005242 
000000 
022700 
001404 


012742 


001404 


012742 
005242 
000000 


012730 


000001 
000310 
000252 
000311 


000002 


000312 


125125 


000313 


000147 
C00400 


200000 
125252 


MACY11 30A(1052) 
1146 


000000 


MBDM2B: 


MBDM2C : 


MBDM2D: 


MBDM2E : 


MBDM2F : 


CMP 
BEQ 


H 
19=JUN=79 11:08 PAGE 85 
TEST MOV-BYTE DESTINATION MODE 2 


#1,R0 
MBDM2C 


#310,-(R2) 
-(R2) 


#252, (RO) + 
MBDM2D 


#311,-(R2) 
-(R2) 


#2 ,R0 
MBDM2F 


#312,-(R2) 
-(R2) 


#125125, a80 
TS147 


#313,-(R2) 
-(R2) 


; TG SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 761 

MOVE TO MAILBOX 4 xeexane 310 xennnne 
3SET MSGTYP TO FATAL ERROR 
:REGISTER NOT INCREMENTED BY ONE 
:TRY DESTINATION MODE 2 W/ODD BYTEéE 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 750 


:MOVE TO MAILBUX # xeexnwe 31] kenmneen 
;SET MSGTYP TO FATAL ERROR 
:CC°S NOT SET CORRECT 


Bae Be Be Be 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 

; REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 741 

MOVE TO MAILBOX # x%xexee 312 xanene 

;SET MSGTYP TO FATAL ERROR 

:REGISTER NOT INCREMENTED BY ONE 

sCHECK DATA 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 731 


“MOV E TO MAILBOX #4 xxxxxxn 3135 wane 
;SET MSGTYP TO FATAL ERROR 

ZDESTINATION DATA INCORRECT 

: OR SEQUENCE ERROR 


SEQ 0085 


AAAA 


wun w 
wud 


iu 
“funu 


A AAA 
nun 


AAAA 
nueu 
nina 


ee | 
“iououed 


FREER RRR RRR EEE EERE EERE REE REE AEE EEE EREEEEEE EERE EEE RE ERED 


THIS TEST VERIFIES MOV DESTINATION MODE 3. RO IS USED TO PICK UP 


SAN ADDRESS AT LOC. 400. 


7 INST. 


LOC 400 POINTS TO LOC. O THE EFFECTIVE DEST. ADDR.. 


ALSO, MOVB 


ARE USED W/ EVEN AND ODD BYTES TO CHECK MOV BYTES INST AND MODE 37 DESTINATIONS. 


FARRER AREER KEE EERE REE EERE ERE KEE EEE EERE REE EEE EEEAE EERE REE EEE 


STEST 147 


$147: 


TEST MOV(B) DESTINATION MODE 3 


CREAR EERE REE REE EEE REE KEE RARER AREER REE EEE 


(R2) 

#147, (R2) 
TS$150-10 
#400,R0 
(RO) 


a0 
#125252,a(R0O)+ 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

2BR 18 ERROR HALT ON SEQ ERROR 
LOC. 400 POINTS TO LOC. 0 
Oc. 0=0 


STRY MOV DESTINATION MODE 2 


CJKDB=B DCF11=AA CPU_DIAG. 


CJKDBB.P11 
012670 


012672 
012674 


012676 


19=JUN= 


102402 
001401 
100404 


012742 
005242 
000000 


022700 
001404 


012742 
005242 
000 


012742 
005242 


000090 
112737 
022737 
001404 


012742 
005242 
000000 


112737 
022737 
001404 


012742 
005242 
000000 


79 10:52 


00C315 


125252 


000317 


000525 
052525 


MACY11 30A(1052) 
1147 


000000 


19=JUN=79 


MDM3A 
MDM3A 
MDM3B 


#314,=(R2) 
-(R2) 
#402,R0 
MDM3C 
#315,-(R2) 
-(R2) 


#125252 ,a40 
MDM3D 


#316,-(R2) 


-(R2) 


#125,a40 
#125125,a40 
MDM3E 


#317,-(R2) 
-(R2) 


#525 ,a4- 
#52525, a#0 
15150 


#320,-(R2) 
-(R2) 


; Ff 
11:08 PAGE 86 
TEST MOV(B) DESTINATION MODE 3 


:BR TO ERROR IF V SET 
;BR TO ERROR IF Z SET 


; TO SCOPE: CLEAR THE RIGHT BYTE o THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 


sMOVE TO MAILBOX # *exaxee 314 
;SET MSGTYP TO FATAL ERROR 

:CC*S INCORRECT 

CHECK DEST. MODE REGISTER 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 756 
sMOVE TO MAILBOX # «keaeee 375 
:SET MSGTYP TO FATAL ERROR 
REGISTER NOT INCREMENTED BY 2 
CHECK DESTINATION DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 746 

sMOVE TO MAILBOX # *exaeee 316 
:SET MSGTYP TO FATAL ERROR 

:DESTINATION DATA INCORRECT 

;TRY MOVB DESTINATION MODE Z EVEN BYTE 
CHECK DATA 


: TO SCOPE: CLEAR THE RIGHT BYTE 4 THIS 
: CONDITIONAL BRANCH INST. AND 
‘ REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 773 

:MOVE TO MAILBOX # eeexeee 31/ 
;SET MSGTYP TO FATAL ERROR 
:DESTINATION DATA INCORRECT 

TRY MOVB DESTINATION MODE 2 ODD BYTE 
CHECK DATA 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITI BRANCH INST. AND 
: REPLACE THE 


MOVE PR TART 
; WHICH FOLLOWS W/ 720 
sMOVE TO MAILBOX # s&exaee 320 
2 SET MSGTYP TO FATAL ERROR 


RREKEERE 


REKKKKE 


REKRREKE 


REEKAEK 


Rkkeeeee 


AAAA 


AAAN 


PETRA AAA ARERR ERE RAR ERAAEERAEEEREEEAEAERRAEREREREEREEEREREAAR Eee eee eeReeeeeee 


: THIS TEST VERIFIES THE MOV DESTINATION MODE 4 INSTRUCTION. 
:SOP_ INSTRUCTIONS ON RO ARE USED TO CLEAR TARGET LOCATION 0. 

7R4 1S USED AS THE MODE 4 ADDRESSING REGISTER, AND 

CONDITIONAL BRANCHES ARE USED TO VERIFY THE DATA, 











J 7 
CJKDB=B DCF 11=AA CPU DIAG. MACY71 30A(1052) 19=JUN=79 11:08 PAGE 87 
CJKDBB.P11 19=JUN~79 10:52 1147 TEST MOV(B) DESTINATION MODE 3 SEQ 0087 


TORRRERRRREEEERERERREEERERE EERE ER ERER EERE EERE EERE ERR R RRR RR RRR RARER ERR REE R ERE EERE 


: TEST 150 TEST MOV DESTINATION MODE 4 
PUPAE EERE R EERE ERR RRR EERE EERE EERE RRR ER EERE RE RRR REE EERE 
75150: INC (R2) sUPDATE TEST NUMBER 
000150 MP #150, (R2) SSEQUENCE ERROR? 
abit, + iy ERROR HALT ON SEQ ERROR 


yy # ;LOC 0=0 
000002 #2,R R4=2 
012345 m1 3345, -(R4) ; TRY MOV DEST. MODE 4 
;BR TO ERROR IF V-BIT SET 
aDrmA ;BR TO ERROR IF Z-BIT SET 


013046 
013050 100004 MDM4B 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


012742 000321 ; #321,-(R2) ZMOVE TO MAILBOX # *eeaeee 321 eeeenee 
005242 =(R2) :SET MSGTYP TO FATAL ERROR 


000000 H :CC*S NOT CORRECT 
005704 : R4 >CHECK DECREMENTING OF MODE 4 REG. 


001404 B MDM4C 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 760 
012742 000322 #322,-(R2) SMOVE TO MAILBOX # xxexxex 322 eeaenee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
H. :DESTINATION MODE REGISTER NOT DECREMFNTED 
012345 : . i? + eae CHECK DESTINATION DATA 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 751 
012742 000323 #323,-(R2) sMOVE TO MAILBOX # Stectet 3235 teeKeee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 DESTINATION DATA INCORRECT 
: OR SEQUENCE ERROR 


IH III IH III I IIIT TI TTT KKK KEHKEKEEEEKRKEKEKEEEEKKKKKEKEKEKEEE 


THIS a VERIFIES THE MOVB DESTINATION MODE 4 INSTRUCTION 
: ON H ODD AND EVEN BYTES. SOP INSTRUCTIONS ON R4 ARE 

: USED 10 CLEAR TARGET LOCATION 0. RO IS USED AS THE MODE 4 
: ADDRESSING REGISTER, AND CMP AND CONDITIONAL BRANCH 

: INSTRUCTIONS ARE USED TO VERIFY THE DATA. 


SRR EERE KERR RRA EEE KEKE KEKE EEE REE EEEREEEEEEEEERER ERE EREEEE EERE 


TEST 151 TEST MOVB DESTINATION MODE 4 
TEESE IOUIIOUOOOOO OOOO EIR EERE RRR RARE EERE SEERA EERE REE R ERE RRR E EERE ERE ees 
013114 005212 TS151: INC (R2) UPDATE TEST NUMBER 
013116 022712 000151 CMP #151, (R2) ; SEQUENCE ERROR? 
4493 013122 001046 BNE T$152=10 ;BR TO ERROR HALT ON SEQ ERROR 


013052 


001404 


AAAA 
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013124 005004 R4 3R4=0 
bye :LOC. Be 


Ai 35125, -(RO) TRY MOVB DEST. MODE 4-ODD BYTE 
RO SCHECK THAT DEST. REG. WAS DECREMENTED 
013144 0014 A 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 
013146 012742 000324 #324 ,-(R2) :MOVE TO MAILBOX # yoy 524 skeeene 
005242 -(R2) :SET MSGTYP TO FATAL ERR 
000000 ;DESTINATION REG. NOT DECREMENTED BY 1 
021427 052400 : CMP a. CHECK DEST. DATA 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE - THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 757 
012742 000325 #325 ,-(R2) sMOVE TO MAILBOX # ‘*kKeee 325 xenennn 
-(R2) +H MSGTYP TO FATAL ERROR 
4 UF DATA NOT CORRECT 
125125 : #125125,=(RO) RY MOVB DEST. MODE 4--EVEN BYTE 
MBDM4C ‘BR. TO ERROR IF V-BIT SET 
:BR TO ERROR IF Z-BIT SET 


AAAA 
nuun 
“iuwounw 


AAAA 
“wn 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITI 


ONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 746 


000326 #326,-(R2) :MOVE TO MAILBOX # *kexewe 526 xatenen 
-(R2) ;SET MSGTYP TO FATAL ERROR 

:COND. CODES INCORRECT 

:CHECK MODE 4 DEST. REGISTER 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE as INSTRUCT ION 
WHICH FOLLOWS W/ 740 
013222 012742 000327 MO #327 ,-(R2) [MOVE TO MAILBOX # *exeex 327 xexenee 

005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 :DESTINATION REG NOT DECREMENTED BY 1 

021427 052525 : CMP (R4) #52525 CHECK DEST. DAT*A 


001404 TS152 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

“no WHICH FOLLOWS W/ 731 

013240 012742 000330 #330,-(R2) MOVE TO MAILBOX # *eeexee 330 senneee 

013244 005242 -(R2) ‘SET MSGTYP TO FATAL ERROR 

013246 000000 ‘DESTINATION DATA INCORRECT 
; OR SEQUENCE ERROR 


2 REE AEEEEEEEE ERE EEE KERR EEE ERERRAREREEREKEE ERE eee 


AAAA 
nun 
wenu 

iuwudu 
iui 


: RO 
013220 MBDM4E 


AAAA 
noun 


AAAA 
wun 


found 
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THIS TEST VERIFIES THE MOV DESTINATION — 5 AND THE MOVB 
DESTINATION MODE 5 = EVEN BYTE INSTRUCTIONS. R4 IS A 


OR THE MOV, AND LOCATION 404 FOR 
THE MOVB INSTRUCTIONS. ra. INSTRUCTIONS ARE USED TO VERIFY 
; PROPER ADDRESSING AND DATA 


TSTITITITIITITIITITITI TILT TI LITT TTT TTT TTT TTT TTT TELE TTT TTT TTTTT TTT 
STEST 152 TEST MOV DESTINATION MODE 5 
a ae, dak cs eee Mee Gee eee Tee ot ne et ee 
013250 S152: (R2) ;UPDATE TEST NUMBER 
000152 #152, (R2) SEQUENCE ERROR? 
T$155-10 :BR To ERROR HALT ON SEQ ERROR 


fe :LOC. 0 = 0 
000400 #400,RO :RO=400 
004321 TRY MOV DEST. MODE 5 
MDMSA 7BR TO ERROR IF V-BIT SET 
:BR TO ERROR IF Z-BIT SET 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


000331 #331,-(R2) ;MOVE TO MAILBOX # *kexxee 533] teenwnn 
~(R2) :SET MSGTYP TO FATAL ERROR 
:COND. CODES INCORRECT 
000376 $ a CHECK MODE 5 REG. WAS DECREMENTED 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE as yeaa 


013320 012742 000332 a VE TO MAILBOX 332 sekenee 


005242 : L ERROR 
000000 MODE 5 REGISTER NOT DECREMENTED BY 2 
004321 ce mers (R4) :CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 750 

000333 #333,-(R2) sMOVE TO MAILBOX # *eeexee 335 teeeeee 

-(R2) :SET MSGTYP TO FATAL ERROR 

:DEST. DATA INCORRECT 

000406 =RO=406 


: #406,R0 
000377 #377 ,a~-(RO) TRY MOV DEST. MODE 5 --EVEN BYTE 
000404 MP #494 ,RO [CHECK MODE 5 REG. 


MDMSE 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 735 
012742 000334 #334 ,-(R2) :MOvE TO MAILBOX # sarek 334 seeeeee 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 


AAAA 
“uuu 


013316 


Huw 
nun 
nun 


AAAA 
neu 


A AAA 
nun 
“iownu 
uuu 
nuuwu 


AAAA 
nui 
nun 
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013372 000000 HALT sMODE 5 ott pata NOT DECREMENTED BY 2 
013374 022714 177721 MDMSE: CMP #177721, (R4) CHECK DEST. DATA 
013400 001404 TS153 


BEQ 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 726 
012742 000335 MOV #335,-(R2) sMOVE TO MAILBOX # *keexee 335 keeeeen 
005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
000000 HALT DEST. DATA INCORRECT 
: OR SEQUENCE ERROR 


einai ai a a a at ital ht nl 


: THIS TEST VERIFIES THE MOV DESTINATION MODE 6 AND MOVB = EVEN BYTE 
DESTINATION MODE 6 INDTRUCTIONS. RO IS USED TO SETUP TARGET LOC.0 
FOR BOTH TESTS. PATTERNS OF ONES AND ZEROES ARE MOVED INTO LOC.0 
:BY MODE 6 INSTRUCTIONS, AND CMP INSTRUCTIONS ARE USED TO VERIFY 

: PROPER ADDRESSING AND DATA. 


TAA OOOO IIIIISISIIIOI IIIS II SIOIIOIIOII IIIS IIIS IDI ITT ITI IIIT INE in 
TEST 153 TEST MOV DESTINATION MODE 6 
a. Mm” Maa 8 meee at Gem oe 
TS153: (R2) UPDATE TEST NUMBER 

#153, (R2) SEQUENCE ERROR? 

T$154-10 BR TO ERROR HALT ON SEQ ERROR 


RO ;RO= 
(RO) SLOC. O=0 
:RO=1 


AAAA 
Huu w 
niniunu 
nun 


RO 

052525 177777 #052525,-1(RO) ;TRY MOV DEST. MODE 6 
MDM6A BR TO ERROR IF V-BIT SET 
MDM6A ;BR TO ERROR IF 2-BIT SET 


MDM6B 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


012742 000336 #336,-(R2) sMOVE TO MAILBOX # *ekaKee 336 0 teKeeee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 :COND. CODES INCORRECT 

4 000001 : #1,RO ;CHECK DEST. REGISTER UNALTERED 


MDM6C 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 757 
012742 000337 #337,-(R2) :MOVE TO MAILBOX # Sieesex: 337 tkeeeee 
005242 -(R2) :SET MSGTYP TO FATAL ER 


ROR 
HA SDEST. REGISTER PRORECILY ALTERED 
022737 052525 000000 MDM6C: #52525 ,aA0 CHECK DEST. DATA 
001404 B MDM6D 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE SS TAR TION 
WHICH FOLLOWS W/ 747 


AAAA 
“ou uw 
nud 
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013502 012742 000340 MOV #340,=(R2) sMOVE TO MAILBOX # *eeenee 340 weeeeee 
0135 5242 -(R2) SET MSGTYP TO FATAL ERROR 
‘DEST. DATA INCORRECT 
000002 0=2 


MD : #2,R0 rR 
000377 177777 #377,=1(RO) ;TRY MOVB DEST. MODE 6 
000002 #2,R0 SCHECK DEST. REGISTER UNALTERED 


013530 001404 MDM6E 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 733 

013532 012742 000341 #341 ,-(R2) sMOVE TO MAILBOX # *eeneee 34] seenene 

35 005242 ’ -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 :DEST. REGISTER INCORRECTLY ALTERED 

022737 177525 000000 .-* #177525 ,aa0 CHECK DEST. DATA 

001404 TS154 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 723 
013552 012742 #342 ,-(R2) sMOVE TO MAILBOX # taeeeee 342 eeanene 
013556 005242 -(R2) :SET MSGTYP TO FATAL ERROR 
013560 000000 :DEST. DATA INCORRECT 
: OR SEQUENCE ERROR 


AAAA 
nunu 
nun 
huunw 
“aunwnu 


013550 


naan aaa alata aii allan lad lia 


THIS TEST VERIFIES THE MOV DESTINATION MODE 7 AND MOVB - A BYTE 


“DESTINATION MODE 7 INSTRUCTIONS. R4 POINTS TO TARGET LOC.O AND R 
31S USED AS THE MODE 7 ADDRESSING REGISTER. CMP INSTRUCTIONS ARE 
ZUSED TO VERIFY PROPER ADDRESSING AND DATA. 


ITTTITITITITITITITITITITTTITTTT TELE TELE LETTE TEE LETTE TET 
STEST 154 TEST MOV DESTINATION MODE 7 
ain we. aan mentee tee tan ae 
013562 TS154: (R2) ; UPDATE TEST. NUMBER 
013564 000154 #154, (R2) s SEQUENCE ERR 
Ts 155-10 :BR To ERROR AT ON SEQ ERROR 


:R 
Ra) :LOC.0=0 
000403 =403 


#403,R0 7RO=40 

070707 177777 #70707,a-1(RO) ;TRY MOV W/DEST MODE 7 
MDM7A ;BR. TO ERROR IF V-BIT SET 
MDM7A ;BR TO ERROR IF 2-BIT SET 


MDM7B 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 


012742 000343 #343,-(R2) sMOVE TO MAILBOX # xxeexee 343 tanenee 
005242 -(R2) SET MSGTYP TO FATAL ERROR 

000000 H :COND. CODES INCORRECT 

022700 000403 : CMP #403, "ted CHECK DEST. REGISTER 


001404 BE MDM7C 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


AAAA 
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KDBB.P11 


013716 


013720 
013724 
013726 


013730 
013732 
013736 
013740 
013744 


012742 
005242 


000000 
022737 
001404 


012742 
005242 
00 


012742 
005242 
000000 


014037 


000344 


070707 


000345 


107070 
000403 


000346 


034307 


000347 


000155 


014012 
014012 


MACY11 


000000 


000001 


000000 


30A(1052) 
7154 


MDM7C: 


MDM7D : 


MDM7E : 


19=JUN=79 
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TEST MOV DESTINATION MODE 7 


MOV 
INC 
HALT 


#344 ,-(R2) 
-(R2) 
#70707, a40 
MDM7D 
#345,-(R2) 
-(R2) 


#107070,a1(RO) 
#403,R0 


#346,-(R2) 
-(R2) 


#34307 ,a#0 


TS155 


#347 ,-(R2) 
-(R2) 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE yee INSTRUCTION 
WHICH FOLLOWS W/ 756 


;MOVE TO MAILBOX # Senenes Sig sonnnes 
SET MSGTYP TO FATAL ERROR 

“DEST. REGISTER INCORRECTLY ALTERED 

[CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
s WHICH FOLLOWS W/ 746 

sMOVE TO MAILBOX # exnane 345 xennnnn 
7SET MSGTYP TO FATAL ERROR 
:DEST. DATA INCORRECT 

TRY MOVB W/DEST MODE 7--ODD BYTE 
= CHECK MODE 7 DEST. REG. 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 734 
MOVE TO MAILBOX # x%xnxxxe 346 xennnnne 
;SET MSGTYP TO FATAL ERROR 
DEST. DATA INCORRECT 
+ CHECK DEST. DATA 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 724 
sMOVE TO MAILBOX # tkeKaee 347 eannnne 
:SET MSGTYP TO FATAL ERROR 
:DESTINATION DATA INCORRECT 
: OR SEQUENCE ERROR 


AAAA 


AAAA 


AAAA 
iu 


a 
iououu 
noun i 


SEQ 0092 


FARRER RK KKRKEKEEREEEEREEEREEEEREEEERKEREREREEERRERERRERR KEKE REE 


: TABLE OF OPERANDS. THE TABLE OF 
arose FOLLOWING THE TEST CODE. 


THIS TEST VERIFIES MODE 4 DOUBLE OPERAND INSTRUCTIONS. 
“THE TEST USES MODE 4 ADDRESSING WITH REGISTER 0 TO MOVE THRU A 


OPERANDS AND THE WORK LOCATION IS 
A SERIES OF 5 DOP mera at oe UTILIZES 


THE DATA_IN THE TABLE TO CYCLE THE WORK LOCATION THRU A 

THE DATA HAS BEEN CHOSEN TO INSURE THAT NO SINGLE ERROR WILL 
WORD AND BYTE INSTRUCTION ACCESSING BOTH EVEN AND 
[ODD ADDRESSES ARE USED IN THE TEST. THE LISTING SHOWS THE 

Z EXPECTED INTERMEDIATE RESULT AS EACH INSTRUCTION IS EXECUTED. 


SRRKERERRERR EERE EERE EERE EERE EERE ERE R RRR RRR E EERE R Eee ene eeeeeeneenes 


; VALUE . 


:GO UNDETECTED. 


:TEST 155 


TS155: 


INC 
CMP 
BNE 
MOV 
MOV 


TEST MODE 4 W/ DOP INSTS. 


FRR RRR ERE REE REE REE REE ERERE REE 


(R2) 

#155, (R2) 
DOP4 
#TBL1,RO 
~(RO) ,a#TBL1 


UPDATE TEST NUMBER 
¢SECUENCE ERROR? 
TO ERROR HALT ON SEQ ERRCR 
SINITIALIZE RO 
7 TBL1=125252 
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4774 013750 064037 


C 8 
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ADD -(RO) ,a#TBL1 
B1CB -(RO) ,@#TBL1 
BISB -(RO) ,@#TBL1+1 


TEST MODE 4 W/ DOP INSTS. 


93 


; TBL1=000377 
; TBL1=000252 
3 TBL1=125252 


3 
4778 013770 


4783 013772 


074006 
4792 014010 
4793 014012 


4807 014014 


4816 014054 


4821 014056 


4829 014074 


012742 000350 
005242 
000000 


125252 


nse t le 000156 


012742 000351 


014006 





CMP -(RO) ,@#TBL1 
BEQ TS156 


CHECK RESULT 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢€ss=2 
3 CONDITIONAL BRANCH INST. AND <===2 
3 REPLACE THE MOVE INSTRUCTION <==== 
ev ; WHICH FOLLOWS W/ 762 <sss2 
MOV #350,-(R2) sMOVE TO MAILBOX # eeaeee 350 wenenen 
INC -(R2) 7;SE1 MSGTYP TO FATAL ERROR 
HALT sRESULT OF MODE 4 INSTS. INCORRECT 
; OR SEQUENCE ERROR 
125252 
52652 
53125 
125252 
TBL1: 0 


FREER REE RRR ERE REE ERR EERE REE EERERERERERERRRERERE EERE REAR eee 


THIS TEST VERIFIES MODE 5 DOUBLE OPERAND INSTRUCTIONS. 
“THE TEST USES AN ADDRESS TABLE STORED FOLLOWING THE TEST CODE. 
;THIS TABLE IS SIMPLY A TABLE OF ADDRESS POINTERS WHICH ADDRESS 
>THE DATA TABLE USED IN THE PREVIOUS TEST. THE TEST IS IDENTICAL TO 
oy PREVIOUS TEST EXCEPT THE DATA IS REFERENCED USING THIS ADDRESS 
; ; TABLE AND MODE 5 ADDRESSING. (SEE PREVIOUS TEST). 


SRRRRRARREREERERR RRR RRR EERE ERE ETRE REE RR EEE EER RETR REE E HERE eeRenenenee 


STEST 156 TEST MODE 5 W/ DOP INSTS. 
ea. he. ik. ee UEEe tate Oe ee 
T5156: INC (R2) ;UPDATE TEST NUMBER 

CMP #156, (R2) ; SEQUENCE ERROR? 

BNE DOPS BR TO ERROR HALT ON SEQ ERROR 


MOV #TBL2+2,RO INITIALIZE RO 
MOV a-(RO),a#TBL1  TBL1=125252 
ADD a-(RO) ,a#TBLI : 
BICB @-(RO) ,a#TBL1 
BISB @-(RO) ,a#TBL1+1 
CMP @-(RO) ,a#TBL1 
BEQ 18157 


:TBL1= 125252 
CHECK RESULT 


TO SCOPE: CLEAR THE RIGHi BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 762 


AAAA 
"woiowiu 
uw 
www 

mu 


Be Be Be Be 


DOPS5: 
MOV #351,-(R2) sMOVE TO MAILBOX # seeeee 35] teneene 
INC -(R2> SET MSGTYP TO FATAL ERROR 
HALT RESULT OF MODE 5 INSTS. OINCORREC 
: OR SEQUENCE ERROR 
TBL1-10 
TBL1-6 
TBL1-5 
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4830 014076 014010 TBL2: = TBLT=2 
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IOI III III IOI IOI III IIIT RR ER Inn RRR Ett 


: THIS TEST VERIFIES MODE 6 DOUBLE gos INSTRUCTIONS. 
;1T USES THE SAME DATA AS THAT USED IN THE MODE 4 TESTS. 
:THIS TIME THE DATA IS ACCESSED USING MODE 6. RO IS SET 
:TO POINT TO THE MIDDLE OF THE TABLE. THE TABLE 15 ACCESSED FROM 
;BOTTOM TO TOP BY VARYING THE OFFSET IN THE MODE 6 INSTRUCTIONS. 
Seer we RESULTS ARE IDENTICAL TO THOSE EXPECTED IN THE MODE 4 . 
+ SucienehenbnsemeesennoNeynenteenhmennaninENtebenerenenndeenneeneetneninénteenet 
TEST 157 TEST MODE 6 W/ DOP INSTS. 
FOI III UII III IORI ORO AI IIIS SISIAAISIIAIII III IIA AI III AA IASIIIAN INIA IIASA ASA HM 
005212 S157: (R2) ;UPDATE TEST NUMBER 
000157 C #157, (R2) fgg ERROR? 
BR TO ERROR HALT ON SEQ ERROR 
014006 AS RO 


-2(RO)a#TBL1+1 : 
177774 toy -@ATBL1 =; CHECK RESULT 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 755 
014154 012742 000352 #352,-(R2) :MOVE TO MAILBOX # xkxKxee 352 xeeneen 
014160 005242 -(R2) :SET MSGTYP TO FATAL ER 


001404 


ROR 
014162 000000 :RESULT OF MODE 6 INSTS. INCORRECT 
OR SEQUENCE ERROR 


IORI OIC IORI RITA IAD IAI IASI ASIII AIA IAAI IIIA IAI AI AIHA AACA A HM 


THIS TEST VERIFIES MODE 7 DOUBLE OPERAND INSTRUCTIONS. 


5 -_ THIS TIME THE DATA IS ACCESSED USING MODE 7. 
;RO IS SET TO POINT TO THE MIDDLE OF THE ADDRESS TABLE IN THE MODE 5 
Hage THE TABLE IS ACCESSED FROM BOTTOM TO TOP BY VARYING THE OFFSET 
:IN THE MODE 7 INSTRUCTIONS. THE DATA RESULTS ARE IDENTICAL TO 
: THOSE EXPECTED IN THE MODE 5 TESTS. 


+ CheNtetenrereTeeeeteneeeeTerenentenneneaeeReReneneneaneneeeRneneseseeeseeenseseee 
TEST 160 TEST MODE 7 W/ DOP INSTS. 
FO RR RRR RRR EERE ERE EERE ERR EEE ee 
005212 7S160: (R2) ;UPDATE TEST NUMBER 
000160 C #160, (R2) ; SEQUENCE ERROR? 
TO ERROR HALT ON SEQ ERROR 
014072 0 
000004 


000000 P 
177776 ) 1 TBL1=125252 
177774 rt ede ‘@ATBL1 ; CHECK RESULT 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


014236 001404 
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; REPLACE THE a INSTRUCTION 
WHICH FOLLOWS W/ 755 
014240 012742 000353 MOV #353,-(R2) ;MOVE TO MAILBOX # Seaveee. 3535 teeeeee 
014244 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
014246 000000 HAL T SRESULT OF MODE 7 INSTS INCORRECT 
; OR SEQUENCE ERROR 


ini aaa la attain nt alia 


THIS TEST VERIFIES THE ROTATE MODE 0 ie ieaes he 
“RO IS LOADED WITH A DATA PATTERN, THE C-BIT IS LOADED, 
ZAN ROL INSTRUCTION IS EXECUTED WITH MODE 0. THE OPERATION IS_ CHECKED 
BY TESTING THE RESULTING DATA AND THE STATE OF THE C AND V BITS. 
NEXT, THE SAME PROCEDURE IS EXECUTED TO TEST MODE 0 BYTE INSTRUCTIONS. 


TERESI SEO III IESE UII UTTER EE EEE ER EE RERER EERE REE EEER ERE ERE EES 


STEST 161 TEST ROTATE INSTRUCTIONS OF MODE 0 
a aa pa sa AS gt eal eh la 
014250 005212 TS161: (R2) ;UPDATE TEST NUMBER 
000161 CMP #161, (R2) s SEQUENCE ERROR? 
TS162-10 [BR TO ERROR om" ON SEQ ERROR 
125252 #125252,R0 s INITIALIZE DATA 
:SET C-BIT 
RO ;TRY ROL W/ MODE 0 
ROTOA :CC=0011 
ROTOA 
052525 #052525,R0 ; CHECK DATA 
ROTOB 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 


012742 000354 #354,-(R2) sMOVE TO MAILBOX # xeeeHRe 354 KKeKeE® 
-(R2) = SET MSGTYP TO a ERROR 
H ROL MODE O FAILE 
125252 : #125252,R0 Z INITIALIZE DATA. 
:SET C-B 


IT 
RO TRY ROL W/ MODE O EVEN BYTE 
ROTOC :CC=0011 


ROTOC 
125125 #125125,R0 CHECK DATA 
TS162 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 751 


000355 #355,-(R2) MOVE TO MAILBOX # tkxewee 355 wenneee 
-(R2) SET MSGTYP TO FATAL ERROR 
RO OLB MODE 0 FAIL 
: OR SEQUENCE Hae 


014300 001404 


nui u 
nou i 
fou 
iouwd 


AANAA 


014302 


AAAA 
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CJKDBB.P 


014344 


014400 


014402 


014474 


005212 


001404 


012742 


001404 


012742 
005242 
000000 


001404 


000162 


052525 


000000 125252 


000356 


125252 


125125 000000 


000357 


125252 


052652 000000 


MACY11 30A(1052) 
7161 
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TEST ROTATE INSTRUCTIONS OF MODE 0 


5 RIKI KKK RIKKI KKK RK REE EKER HERE 


THIS TEST VERIFIES THE ima MODE 1 INSTRUCTIONS. 


THE DATA TO BE ROTATED IS IN 
ADDRESSING REGISTER. 


THE C~BIT IS LOADED AN 


RO IS USED AS THE 
AND AN ROL IS EXECUTED. 


: THE go ¥ ARE CHECKED BY COMPARING THE DATA RESULTS AND TESTING 
V BITS. THIS PROCEDURE IS THEN REPEATED TWICE MORE 
:T0 TEST THE BYTE ROTATES. 


WOSTISTISITITITITITITITITITITTITITIT TTT TTT TTT TTT Tre rrrirTrrrrerreereereeereeeeeeeeee 


: THE C AN 


STEST 162 


1$162: 


ROTIA: 


ROT1B: 


ROTIC: 


ROT1D: 


FIRST ON BYTE 0, THEN ON BYTE 1. 


TEST ROTATE INSTRUCTIONS W/ MODE 1 


FRR II IIIT I TTT TOIT TOT TT TORT TR TOT TOR TROT TIOTOTOTOIOT TOIT TOTOTOTOTTOTOTOTT  Re tt 


(R2) 
#162, (R2) 
T$165-10 


0 
#52525, (RO) 


(RO) 
ROTIA 


ROT1A 
a40 4125252 
ROT1B 


#356,-(R2) 
-(R2) 


#125252, (RO) 
(R 


#357,-(R2) 
-(R2) 


#125252, (RO) 
RO 
80 


(RO) 
ROTIE 


ROTIE 
#052652 ,a40 
7S$163 





;UPDATE TEST NUMBER 

SEQUENCE ERROR? 

;BR TO ERROR HALT ON SEQ ERROR 
POINT TO _L(¢ 0 

SINITIALIZE DATA 

;CLEAR C-BIT 

TRY ROL W/ MODE 1 

:CC=1010 


s CHECK RESULT 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 764 


sMOVE TO MAILBOX # *xxaeee 356 
SET MSGTYP TO FATAL ERROR 
zROL MODE 1 FAILED 


INITIALIZE DATA 
; TRY athe W/ MODE 1 EVEN BYTE 


AAAA 
nud 
nu u 
Vue nu 


REKEKEK 


i: TEST RESULT 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <z=22 
CONDITIONAL BRANCH INST. AND = <==== 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 746 


sMOVE TO MAILBOX # x%exxKe = 357 
:SET MSGTYP TO FATAL ERROR 

;ROLB W/ MODE 1 EVEN BYTE FAILED 
;POINT TO ODD BYTE 

:SET C-BIT 

; TRY ROLB W/ MODE 1 ODD BYTE 
7CC=0011 


CHECK DATA 


KRKKKEKE 


SEQ 0097 


CJKDB=B DCF11=AA CPU wat 
CJKDBB.P11 19=JUN=79 10:52 


012742 
005242 
000000 


000360 


005212 
000163 


173737 
167676 


014546 001404 


014£50 


012742 000361 


0064040 


004100 
001002 
005300 
001404 


014610 


014610 012742 000362 


MACY71 30A(1052) 
7162 


000000 


000000 


ROTIE: 


19=JUN=79 


11:08 


H 8 
PAGE 9 


8 
TEST ROTATE INSTRUCTIONS W/ MODE 1 


MOV 
INC 
HALT 


7 <i 


-(R 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
; CONDITIONAL BRANCH INST. AND <==== 
é REPLACE THE MOVE INSTRUCTION <==== 
é WHICH FOLLOWS W/ 726 <z222 


sMOVE TO MAILBOX # *keneee 360 teeenne 
;SET MSGTYP TO FATAL ERROR 
:ROLB W/ MODE 1 ODD BYTE FAILED 


; OR SEQUENCE ERROR 


SEQ 0098 


SRE RR EERE RRR KKK EEE KEE EERE REE EREREEREEREE 


THIS TEST VERIFIES MODE 2 ROTATE INSTRUCTIONS. 


“THE SAME PROCEDURE 


AS_IN THE OTHER ROTATE TESTS ARE USED. RO 


:1S_ USED AS THE ADDRESSING REGISTER AND IS CHECKED FOR PROPER 
BYTE INSTRUCTIONS ARE ALSO CHECKED. 


DGS CISISIIISIIOIOI IOI ISISIIDISIOINIIIIDIIISIOIIOIISIIEIDISISEI IODIDE nines 


: INCREMENT ING. 


STEST 163 


7S163: 


ROT2A: 


ROT2B: 


ROT2C: 


INC 


TEST ROTATE INSTRUCTIONS W/ MODE 2 


FERRE KEKE K REE EEE ERE ERE KER EERE EEE KEKE REE 


(R2) 
#163, (R2) 
TS164-10 


RO 
#173737, (RO) 


(RO) + 


ROT2A 
#167676, a0 


ROT2A 
RO 


RO 
ROT2B 


#361,-(R2) 
-(R2) 


RO 

#4040, (RO) 
(RO) + 
ROT2C 
44100,a40 
ROT2C 

RO 
ROT2D 


#362,-(R2) 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 

7BR TO ERROR HALT ON SEQ ERROR 
sPOINT TO LOC 0 

: INITIALIZE DATA 

ZCLEAR C-BIT 

TRY ROL W/ MODE 2 

SCHECK C-BIT 

CHECK DATA 

BRANCH IF RESULT INCORRECT 
TEST RO 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION <==== 
WHICH FOLLOWS W/ 762 <s=s= 


sMOVE TO MAILBOX # *xxxnwn = 361 
:SET MSGTYP TO FATAL ERROK 

ROL W/ MODE 2 FAILED 

z:POINT TO LOC 0 

ZINITIALIZE DATA 

iCLEAR C-BIT 

:TRY ROLB W/ MODE 2 EVEN BYTE 
i CHECK mh 

7 CHECK DAT 

‘BRANCH IF A DATA INCORRECT 
;CHECK RO 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS wW/ 742 


aeeeeee 362 


keke eKE 


A NAA 
nieuw 


te) 


:MOVE TO MAILBOX # 


eeeraeere 
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014614 005242 INC =(R2) SET MSGTYP TO FATAL FRROR 
000000 ALT :ROLB W/ MODE 2 EVEN BYTE FAILED 
RO ;POINT TO LOC +. 
#4040, (RO) INITIALIZE DATA 
RO Sere aT ODD BYTE OF DATA 


-<BIT 

(RO)+ s TRY ROL W/ MODE 2 ODD BYTE 

. ROT2E mh 

010440 000000 #10440,a00 
ROT2E ; BRANCH 1 “DATA INCORRECT 


RO ; CHECK 
RO 
014652 TS164 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

; REPLACE THE MOVE INSTRUCTION 
014654 : WHICH FOLLOWS W/ 720 


012742 000363 : #363,-(R2) sMOVE TO MAILBOX # *eennee 363 wneneee 
005242 -(R2) :SET MSGTYP TO FATAL ©RROR 
000000 7ROLB W/ MODE 2 ODD BYTE FAILED 

: QR SEQUENCE ERROR 
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CJKDBB.P11 19=JUN=79 10:52 1163 TEST ROTATE INSTRUCTIONS W/ MODE 2 SEQ 0100 
5072 
5073 PRA AREREREREEEEAREEEEREREEEAERERRAERRAEEREEREEREEEEREREREEEE ERRATA EERE ES 
5074 ; 
5075 : THIS TEST VERIFIES MODE 3 ROTATE INSTRUCTIONS. 
5076 ;THIS TEST USES THE SAME PROCEDURES AS IN THE OTHER ROTATE 
5077 ;TESTS. THE DATA IS STORED IN LOC. 0 AND IS ADDRESSED USING 
ae bees 37. BYTE ADDRESSING IS ALSO CHECKED FOR EVEN AND ODD BYTES. 
5080 ETITITITITITITITITITITITITITITTITTTTTTTT TTT TELL TTT TTT TTT TTT Tite 
5081 [TEST 164 TEST ROTATE INSTRUCTIONS /W MODE 3 
5082 or pho ema? inca aan = nr Ni elie il nati 
5083 014664 005212 7S164: INC (R2) ;UPDATE TEST NUMBER 
5084 014666 022712 000164 CMP #164, (R2) ; SEQUENCE ERROR? 
5085 014672 001051 BNF TS165-10 ‘BR TO ERROR HALT ON SEQ ERROR 
5086 014674 012737 052525 000000 MOV #52525,a40 Z INITIALIZE DATA IN LOC 0 
5087 014702 000261 SEC SET C-BIT 
5088 014704 006137 000000 ROL av0 sTRO ROL W/ MODE 3 
5089 014710 103404 BCS ROT3A + CHECK C-BIT 
5090 014712 022737 125253 000000 CMP 4125253,a40 + CHECK DATA 
5091 014720 001404 BEQ ROT3B 
5092 ; TO SCOPE: a THE RIGHT BYTE OF THIS <==== 
5093 ; ONDITIONAL BRANCH INST. AND <==== 
5094 s REPLACE THE MOVE INSTRUCTION ¢ss23 
5095 : WHICH FOLLOWS W/ 764 <zzzz 
5096 014722 ROT3A: 
5097 014722 012742 000364 MUV #364 ,-(R2) sMOVE TO MAILBOX # xeewnne 364 xennnne 
5098 014726 0605242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
5 014730 000000 HALT ;ROL W/ MODE 3 FAILED 
5100 014732 012737 125252 000000 ROT3B: MOV #125252,a40 ZINITIALIZE DATA 
5101 014740 000241 CLC = CLEAR C-BIT 
5102 014742 106137 000000 ROLB ar0 ;TRY ROL W/ MODE 3 EVEN BYTE 
5103 014746 103004 BCC ROT3C _ > CHECK C-BIT 
5104 014750 023727 000000 125124 4$: CMP a40 4125124 sCHECK DATA 
5105 014756 001404 BEQ ROT 3D 
5106 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5107 3 CONDITIONAL BRANCH INST. AND <===2 
5108 : REPLACE THE MOVE INSTRUCTION <==== 
5109 ; WHICH FOLLOWS W/ 745 <===2 
5110 014760 ROT3C: 
5111 014760 012742 000365 MOV #365,-(R2) sMOVE TO MAILBOX # «eeennne 365 eeenene 
5112 014764 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
5113 014766 000000 ; HALT sROL W/ MODE 3 EVEN BYTE FAILED 
5114 014770 012737 125252 000000 ROT3D: MOV #125252 ,a40 I TIA IgE DATA IN LOC. 0 
5115 014776 000261 SEC SET C 
5116 000 106137 000001 ROLB av) : TRY ROL ws MODE 3 ODD BYTE 
5117 015004 103004 BCC ROT3E + CHECK C-BIT 
5118 015006 022737 052652 000000 CMP #052652 ,aa40 + CHECK DATA 
5119 015014 001404 BEQ TS165 
5120 ; TO SCOPE: ay THE RIGHT BYTE OF THIS <==== 
5121 : ONDITIONAL BRANCH INST. AND <==== 
5122 : REPLACE THE MOVE INSTRUCTION <==== 
5123 3 WHICH FOLLOWS W/ 726 <==== 
5124 015016 ROT3E: 
5125 015016 012742 000366 MOV #366,-(R2) sMOVE TO MAILBOX # seenwwe 366 seenene 
5126 015022 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
5127 015024 000000 HALT sROL W/ MODE 3 ODD BYTE FAILED 
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5128 ; OR SEQUENCE ERROR 
5129 


LEAR REE REE ARERREE RR EREE ERE ERE EEE EEE 


THIS TEST VERIFIES cert 4 ROTATE INSTRUCTIONS. THE DATA IS 
STORED IN LOC. 0. ROIS S O 2 AND ae ot IS SET. AN ROL MODE 4 
7. — TO ROTATE LOCATION. Ou SING RO. THE DATA IS CHECKED 

THE C AND V BITS ARE TESTED. THE PROPER DECREMENTING OF 
RO. IS VERIFIED. 


ISTISTISITITITIITI IIIT IIIT ITIL T TTT TTT TTT TTrirrrrrrrirrrrrirereeririreertittTiTiie 


PPS STSIVA ASIST 
ee ee ae nd td td td I et 
BS BWAWWNWNNA 
SSSROIFARAGYS 


S TEST 165 TEST MODE 4 W/ ROTATE INSTRUCTIONS 
SOO eh ater >a atone oe ge yh hn tole abba 
015026 005212 TS165: INC (R2) ;UPDATE TEST NUMBER 
5142 015030 022712 000165 CMP #165, (R2) ; SEQUENCE ERROR? 
5143 015034 001016 BNE TS166-10 ‘BR TO ERROR HALT ON SEQ ERROR 
5144 015036 012737 070707 000000 MOV #070707,a40 : INITIALIZE DATA IN LOC. 0 
5145 015044 012700 000002 MOV #2,R0 ; INITIALIZE RO AS POINTER 
5146 015050 000261 SEC SET C-BIT 
5147 015052 006140 ROL -(RO) ;TRY ROL W/ MODE 4 
5148 015054 103406 BCS ROT4 sCHECK C-BIT 
5149 015056 022737 161617 000000 CMP #161617,a40 ;CHECK DATA 
5150 015064 001002 BNE ROT4 ‘BRANCH IF DATA INCORRECT 
51 015066 005700 TST RO sCHECK MODE 4 REGISTER 
52 015070 001404 BEQ TS166 
5 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5 : CONDITIONAL BRANCH INST. AND <==== 
5 : REPLACE THE MOVE INSTRUCTION <==== 
5 : WHICH FOLLOWS W/ 741 <¢s==2= 
57 015072 ROT4: 
58 015072 012742 000367 MOV #367 ,-(R2) sMOVE TO MAILBOX # xkKKKKR 367 KkKKKKE 
59 015076 005242 INC -(R2) 7SET MSGTYP TO FATAL ERROR 
60 015100 000000 HALT ROL MODE 4 FAILED 
: ; OR SEQUENCE ERROR 
6 


lin anna ie i aaa lata iaiaiaelianitai 


: THIS TEST VERIFIES MODE 5 ROTATE INSTRUCTIONS. 
"THE DATA IS STORED IN A WORK LOCATION (ROTX) AT THE END OF THE 


oO 
WN 0 ODONAMRWN $0 OONAURW 


6 : TEST ss LOC. 0 IS LOADED WITH THE ee OF THE DATA (ROTX). 

6 ;RO IS SET TO 2. THE CARRY IS CLEARED AND A 5 ROL 

6 71S EXECUTED USING RO AS_AN ADDRESSING REGISTER. THE DATA IS 

7 >CHECKED, THE C AND V BITS TESTED, AND RO CHECKED FOR PROPER 

4 :DECREMENT ING. 

7 TE AISOIISISIIE IOUS SISSISSSIIIISISISIIOISIISISISISIIUUIDUOISIIS UE En Orniiiiiiiirsnee: 
74 STEST 166 TEST MODE 5 W/ ROTATE INSTRUCTIONS 

75 amc ae i) mate. fe ames Wat ae eee 
76 015102 005212 TS166: INC (R2) UPDATE TEST NUMBER 

77 015104 022712 000166 CMP #166, (R2) SEQUENCE ERROR? 

78 015110 001021 BNE ROTS ;BR TO ERROR HALT ON SEQ ERROR 

79 015112 012737 015164 000000 MOV #ROTX ,a40 MOVE POINTER TO LOC. 0 

80 015120 012700 00000 MOV #2,R0 T MODE 5 sth TO LOC. 0 

81 015124 012767 107070 000032 MOV #107070, ROTX SINITIALIZE DAT 

82 015132 000241 CLC SCLEAR C-BIT 

83 015134 006750 ROL a-(RO) TRY ROL W/ MODE 5 
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5184 03006 ROTS CHECK C=BIT 
016160 015164 #016160,@#ROTX ;CHECK DATA 

BN ROTS BRANCH IF DATA INCORRECT 
sCHECK MODE 5 REGISTER 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
015154 WHICH FOLLOWS W/ 756 


0:5154 012742 #370,-(R2) sMOVE TO MAILBOX # *kxexee 370 xeanene 
015160 005242 -(R2) 7SET MSGTYP Ly ' FATAL ERROR 
015162 000000 :ROL MODE 5 FAILED 
: OR SEQUENCE ERROR 
015164 000000 ROTX: 


SHREK RRR KEKE KKK KKK KEKE KR KEKE EKER ERE 


“wi 
— 
co 
w 


RO 
015152 TS167 


DVDS AVA SAAT 
— es SS SF Ss os es ss SS 
300 <0 0 0 0 00 C0 Co 
BLEARASLSSELE 
AAAA 
wu tt 
ninn 


: THIS TEST VERIFIES MODE 6 ROTATE INSTRUCTIONS. 
:1T_ USES THE SAME PROCEDURE AS THE ABOVE TEST EXCEPT THE 
ROTATE INSTRUCTION USES MODE 6 ADDRESSING WITH REGISTER 7. 
: THE DATA IS STILL OPERATED ON IN LOC. ROTX (SEE PREVIOUS TEST). 


USTTITITILILILITILITITETETETELE LTTE LETT TTT T TTT T ETT T UTE T TTT 
STEST 167 TEST MODE 6 W/ ROTATE INSTRUCTIONS 
FI I KK KERR KEKE ERE EEE EERE ERE EKER 
1S167: (R2) ;UPDATE TEST NUMBER 
000167 #167, (R2) sSEQUENCE ERROR? 
1S170-10 [BR TO ERROR HALT ON SEQ ERROR 
125252 015164 #125252, a#ROTX i INITIALIZE DAT 
177752 ROTX ‘Fhy ROL W/: MODE 6 
ROT6 SCHECK C-BIT 
052525 015164 MP #32525 .@AROTX SCHECK DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 764 


000371 MOV #371,-(R2) sMOVE TO MAILBOX # *xxxewee 371 tuxnnne 
-(R2) SET MSGTYP TO FATAL ERROR 
015232 sROL W/ MODE 6 FAILED 
; OR SEQUENCE ERROR 


015222 


AAAA 
= 


015224 
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ila tata aa ii iach it aki lita 


iTHIS Sy VERIFIES MODE 7 ROTATE INSTRUCTIONS. 

;THE DATA IS SET IN LOC. ROTX, (SEE PREVIOUS TEST). THE ROL INSTRUCTION 
SADDRESSES IT INDIRECTLY USING MODE 7 AND INDIRECT ADDRESS LOCATION 

: (ROTXAD) FOLLOWING THE TEST CODE. 


TSAI SISO IIIS IOI IOEIEIIISISII I IOUISIIISIIISOIIISIIEIIEIS ISIE UIE noi ii 
STEST 170 TEST MODE 7 W/ ROTATE INSTRUCTIONS 
DBI IIIS IIIISIOIIOIIIIICISIOIIIIIIUIOIDIOIOITIOII IIT TOT OT TOTO OT TOT TI TOTO TOTTI TIT TOT I TOTTI I TTT IE 
TS170: 1 (R2) sUPDATE TEST NUMBER 
000170 #170, (R2) SSEQUENCE ERROR? 
ROT? BR TO ERROR - ON SEQ ERROR 
052525 #52525, QMROTK ;INITIALIZE D 
015164 #ROTX , @H#ROTXAD SINITIALIZE ADDRESS POINTER 


000022 ROT XAD 
ROT7 : CHEC 
015164 PONgTNMIeREN i ZCHECK DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 761 


012742 000372 #372,-(R2) sMOVE TO MAILBOX # *keKwee 372 xaeenne 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 sROL_W/ MODE 7 FAILED 
: OR SEQUENCE ERROR 
015310 000000 ROTXAD: 0 


aaa aca naa ha iin cilia 


: THIS TEST VERIFIES MODE 0 SWAB INSTRUCTION. RO IS SET TO 
3177400. A SWAB MODE 0 IS EXECUTED AND THE CONDITIONAL BRANCH 
31S USED TO CHECK THE SIGN OF THE RESULT. ALSO, A COMPARISON 
in MADE TO CHECK THE DATA RESULTS. 


TA IEC ISIC OIE IOIEIIOI OUTSIDE TOTES IIIS IIIT ITI III ites 
STEST 171 TEST MODE 0 W/ SWAB INST. 
FOF OR OIRO IIIT IIIA IAAIAAII IIIS IIIS III IIIA IN AIII AISI AISI AISI AISI AIA AAA AAA 
015312 005212 TS171: (R2) ;UPDATE TEST NUMBER 
022712 000171 C #171, (R2) Fe ERROR? 
00101 T$172-10 TO ERROR HALT ON SEQ ERROR 
012700 177400 #177400,R0 :MOvE TEST PATTERN TO RO 
000300 RO ;TRY SWAB MODE 0 
015330 100404 SBO 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 773 
015332 012742 000373 #373,-(R2) MOVE TO MAILBOX # xxeeeee 373 tanenee 
015336 005242 -(R2) SET MSGTYP TO FATAL ERROR 
015340 000000 ;SWAB DID NOT SET CC'S CORRECT 
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022700 000377 SBO: CMP #377 ,RO 7CHECK RESULT 


001404 BEQ 1$172 
:; ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH {FOLLOWS W/ 764 
012742 MOV #374,-(R2) “MOVE TO MAILBOX # fteseen 374 seneene 
005242 INC =(R2) :SET MSGTYP TO FATAL ERROR 
000000 HALT SRESULT OF SWAB MODE 0 FAILED 
: OR SEQUENCE ERROR 


hana i ata a a aint i 


THIS TEST VERIFIES MODE 1 SWAB INSTRUCTION. THE TEST 
“PATTERN IS MOVED TO <b 0. RO_IS CLEARED AND USED AS THE ADDRESSING 
pp Hi THE MODE 1 SWAB. THE DATA RESULTS ARE CHECKED WITH 


S eaeanepndedanetennenenrinnbeesseieentennenabetedinebedabniintediumiianenimaiaienies 
STEST 172 TEST MODE 1 W/ SWAB INST 
FERRER ERE R EERE EERE EEE EEE REE EEE REAR EREERRAEERE EERE 
1S172: (R2) ZUPDATE TEST NUMBER 
000172 #172, (R2) + SEQUENCE ERROR? 
TS173-10 [BR TO ERROR HALT ON SEQ ERROR 
125652 000000 #125652, ,a#0 :MOVE TEST PATTERN TO LOC. 0 


S (RO) Y SWAB MODE 1 
125253 000000 tht ta ate ‘CHECK RESULT 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 
012742 #375,-(R2) “MOVE TO MAILBOX # xeeeeee 375) teeeeee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 RESULT OF SWAB MODE 1 FAILED 
: OR SEQUENCE ERROR 


8 


001404 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


WIN WWNIWWNWWNWWW 
MO et et st So 
SO OONAWESWN—O 
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015422 


015452 


015454 


015460 


015470 


015472 


015475 
015500 


DAAARAAA 


WroNM—-—-SooO 
ORSVSRL 


012742 
005242 
000000 


000 
022737 
001404 


000173 
125152 000000 


065252 000000 


000376 


000002 


000377 


000174 
000377 000000 
000000 
177400 000000 
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SEQ 0105 


FREER EERE EERE ERR EEE EREEEEEERERE EERE 


THIS TEST VERIFIES MODE 2 Wt: INSTRUCTION. THE TEST 


“PATTERN IS MOVED TO LOC O. 


32 ADDRESSING REGISTER. 


RO IS CLEARED AND USE 


:RO IS CHECKED FOR PROPER DECREMENTING. 


UTTITITITITITITITIITITITITITTITITITTTTTTT TTT TTT TTT TTT TTT TELE TELE 


STEST 173 


$173: 


SB2: 


TEST MODE 2 W/ SWAB INST 


an, oe -: 2 - oaekee See emer ee 


(R2) 
#173, (R2) 
TS174-10 
#125152,a40 
RO 


(RO) + 
#65252, a#0 
SB2 


#376,-(R2) 
-(R2) 


#2,R0 
T8174 


#377 ,-(R2) 
-(R2) 


UPDATE TEST NUMBE 
SEQUENCE ERROR? 
TO ERROR HALT 


D AS THE MODE 


THE RESULTS ARE CHECKED WITH A COMPARE. 


R 
ON SEQ a 


:BR 
ROO TEST PATTERN TO LOC 


TRY SWAB MODE 2 
[CHECK RESULT 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. 


AND 
REPLACE THE MOVE E INSTRUCTION 


WHICH 


FOLLOWS W/ 


“MOVE TO MAILBOX # Keene 376 


«SET MSGTYP TO FAT 


AL ERROR 


;RESULT OF SWAB MODE 0 FAILED 
CHECK EFFECT OF REG. 


REREKEK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
COND 


ITIONAL BRANCH INST. AND 
REPLACE THE MOVE 5 mtn 


WHICH 


FOLLOWS W/ 757 


[MOVE TO MAILBOX # *exxaee 377 
‘SET MSGTYP TO FAT 
sREGISTER VALUE INCORRECT 


OR SEQUENCE ERR 


AL ERROR 
OR 


REKKKER 


AAAA 


FREER REE REE RRR REE ERE ERE EERE EERE EEE EERE EERE 


THIS TEST VERIFIES - ¥ nie SWAB INSTRUCTION. THE 
“PATTERN IS MOVED TO LOC O. e 3 

USING R7 AS sie ADDRESSING REGISTER. A COMPARE V 
DATA RESULTS 


STITISITITITTTITTTITTTTT TTT T TTT TET TTT TET ETE TTTLTTTT TTT TTT TTT TTT TTT TTT TTT Tee 


STEST 174 


S174: 


TES 
SWAB INSTRUCTION IS EXECUTED 


TEST MODE 3 W/SWAB INST. 


SRR ERE REE ERRRE REE E EKER REEEREEEREAEREEREAEREEAEARRE ERR RRR e 


(R2) 

#174, (R2) 
TS5175-10 
#377,a40 


avd 
#177400,a40 
T8175 


UPDATE TEST NUMBE 
: SEQUENCE yt 


Y SWAB 
ZCHECK RESULT 


ERROR HA 
aoe TEST PATTERN. | 
:TR W/ MODE 3 


ERIFIES THE 


R 


ak SEQ ERROR 
0 LOC. 0 


. * 
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; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 766 

015534 012742 000490 MOV #400,-(R2) sMOVE TO MAILBOX # *#eenee 400 seennne 

Beers 005242 INC =(R2) ;SET MSGTYP TO FATAL ERROR 

5542 000000 HALT [RESULT OF SWAB INCORRECT 

; CR SEQUENCE ERROR 


nunhiu 
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; SRRAAHAARARERAHERARAK RHARARAEEHAHREERHEHHHERERERHEHHRERREEREHEHRERREREEHHRE AREER EEE 


; THIS TEST VERIFIES MODE 4 SWAB INSTRUCTIONS. THE DATA 

:1S MOVED TO LOC 0. RO IS SET TO 2 AND USED AS THE MODE 4 ADDRESSING 
SREGISTER. THE DATA IS CHECKED WITH A COMPARE AND RO IS CHECKED 
FOR PROPER DECREMENTING. 


jAAeenaecenaenncanecaneceneeuaeneeeennenneucneceneceeannesaennenanesneesnneneesenenes 
sTEST 175 TEST MODE 4 W/ SWAB INST 
PRAT A AERA AREA EERE EER EERE EAE REARE ERE RAERREEREREEERRERRRERERE ARERR REE RE KERR EEE Te 
015544 15175: ‘ (R2) ; UPDATE TEST NUMBER 
000175 #175, (R2) > SEQUENCE ERROR? 
1S176=10 ;BR TO ERROR HALT ON SEQ ERROR 
125652 000000 | #125652 ,a40 ;MOVE TEST PATTERN TO LOC. O 
000002 #2,R0 :SET UP ap te POINTER 
-(RO) i; TRY SWAB MODE 4 
125253 000000 4 pat SCHECK RESULT 
S 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
. WHICH FOLLOWS W/ 765 

012742 00040) #401,-(R2) MOVE TO MAILBOX # sexeeee 40] teeenee 

005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 RESULT OF SWAB INCORRECT 

005700 : RO i CHECK EFFECT ON REG. 


015612 001404 1S176 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 757 

015614 012742 e #402,-(R2) :MOVE TO MAILBOX # seeneee 402 sennene 

015620 005242 -(R2) :SET MSGTYP TO FATAL ERROR 

015622 000000 [REGISTER VALUE INCORRECT 
; OR SEQUENCE ERROR 
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5423 
5424 ° DERE RRR EEE REE ERE REAR EERE RERREEEEE REET 
5425 ; 
5426 THIS TEST VERIFIES MODE 5 SWAB INSTRUCTION. THE TEST USES 
5427 ‘Two LOCATIONS FOLLOWING THE TEST CODE. SBS5SX HOLDS THE DATA; 
5428 : SBSXAD IS A POINTER TO THE DATA LOCATION. THE DATA IS MOVED TO 
5429 : SBOX AND RO IS SET TO TWO PLUS THE ADDRESS OF — FOLLOWING 
5430 THE MODE 5 SWAB SB5X IS CHECKED FOR THE PROPER DATA. RO IS 
ees : CHE CKED TO SEE THAT IT WAS DECREMENTED PROPERLY. 
4 
5433 ITTTITISITITITITITITITITITITTITITITITITTTT TTT TTT LTTE TELE TTT TTT TTT 
5434 S TEST 176 TEST MODE 5 W/ SWAB INST. 
5435 ZOD IOISISISIOISIOIIIOIDIOIOIOIUIOIOIUIOIDIOIOIDIDIOIDIDIUIDIOIDIOII ISI IIIS TOI ITT IDIOTS TISSUE rrnernent 
5436 015624 005212 TS176: INC (R2) ;UPDATE TEST NUMBER 
5437 015626 022712 000176 CMP #176, (R2) ; SEQUENCE ERROR? 
5438 015632 001021 BNE SB5 BR TO ERROR HALT ON SEQ ERROR 
5439 015634 012700 015712 MOV #SB5XAD+2,RO ;SET UP POINTER TO WORK LOCATION 
5440 015640 012767 125125 000040 MOV ty 3 SB5X :MOVE PATTERN TO WORK LOCATION 
5441 015646 000350 SWAB a- (RO) TRY SWAB MODE 5 
5442 015650 022767 052652 000030 CMP Ly ate SB5X + CHECK RESULT 
5443 015656 001404 BEQ 
5444 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5445 F CONDITIONAL BRANCH INST. AND <==== 
5446 ; REPLACE THE a INSTRUCTION <==== 
5447 WHICH FOLLOWS W/ 765 <z=22= 
5448 015660 012742 000403 MOV 4403,-(R2) sMOVE TO MAILBOX # xxexxee 403 cannnne 
5449 015664 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
5450 015666 000000 HALT SRESULT OF SWAB INCORRECT 
5451 015670 020027 015710 SB5A: CMP RO,ASB5XAD sCHECK RESULT OF REG. 
5452 015674 001406 BEQ 1S177 
54535 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5454 : CONDITIONAL BRANCH INST. AND <¢s2s= 
5455 : REPLACE THE MOVE INSTRUCTION <==== 
5456 : WHICH FOLLOWS W/ 756 <=2=2 
5457 015676 SB5: 
5458 015676 012742 000404 MOV #404 ,-(R2) MOVE TO MAILBOX # xeeewee 404 xeennee 
5459 015702 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
5460 015704 000000 HALT REGISTER VALUE INCORRECT 
5461 OR SEQUENCE ERROR 
5462 015706 000000 SB5X: 0 WORK LOCATION 
5463 015710 015706 SB5XAD: SB5X 


, » 
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PTAA ERA ARA ERA AAA RARER EREREERAHRAERAAORRARRRERRAEEAAEARERERRERERHRHEE RRA KER Ae 


THIS TEST VERIFIES MODE 6 SWAB INSTRUCTION. THIS TEST 
TUSES A WORK LOCATION (SB6X) FOLLOWING THE TEST CODE. TEST DATA 
31S LOADED INTO THE WORK LOCATION. RO, THE ADDRESSING REGISTER 
:IS LOADED WITH 6 LESS THEN THE ADDRESS OF THE WORK LOCATION. 
THE MODE 6 SWAB IS EXECUTED WITH A +6 OFFSET. THE DATA IS 
; VERIFIED WITH A COMPARE. 


PISTISIIITIIITITITISTITITITITTITTT TTT TTT TTT TTT TTT TTT ETT TTT TTT TTT 


TTEST 177 TEST MODE 6 W/ SWAB INST. 
or en easel ata tacnith ee yon ala ten ii 
015712 005212 1S177: (R2) ;UPDATE TEST NUMBER 
000177 C #177,(R2) ; SEQUENCE ERROR? 
SB6 [BR TO ERROR HALT ON SEQ ERROR 
125125 000030 #125125, SB6X :MOVE PATTERN TO WORK LOCATION 
015752 j #SB6X-6 ,RO sMOVE OFFSET POINTER TO RO 
000006 6(RO) 3; TRY SWAB W/ MODE 6 
052652 0v0006 rua > CHECK. RESULT 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
3 CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 764 
015750 


012742 000405 #405,-(R2) sMOVE TO MAILBOX # *eeaxxe 405 tannnwe 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 


015746 001405 


AAAA 


ion u 
“uu 


015756 000000 RESULT OF SWAB INCORRECT 
: OR SEQUENCE ERROR 
015760 000000 2 WORK LOCATION 
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CJKDBB.P11 19=JUN=79 10:52 1177 TEST MODE 6 W/ SWAB INST. SEQ 0110 
5497 
5498 FERRARA RRA RRA ERE RAE ERA EERE ERERAERERREREEERRERRE EEE EREKEEREERERERAERE TREK R EERE 
5499 : 
5500 THIS TEST VERIFIES MODE 7 SWAB INSTRUCTION. THIS TEST 
5501 USES TWO LOCATIONS FOLLOWING THE TEST CODE: A WORK LOCATION 
5502 ; (SB7X) AND A POINTER TO THE WORK LOCATION (SB7XAD). DATA IS MOVED 
5503 TO THE WORK LOCATION. RO IS LOADED WITH 72 LESS THAN THE ADDRESS 
5504 ;OF THE ADDRESS POINTER. THE DATA IS SWAB‘ED USING A MODE 7 
5505 : INSTRUCTION WITH AN OFFSET OF +72. THE DATA IS VERIFIED WITH A 
r+ ; COMPARE . 
5508 ITTIITIIITITITIIITITITITITITTLTIT ITIL TTT TITTLE TLE EEE TEE TTT 
S TEST 200 TEST MODE 7 W/ SWAB INST. 
5510 lcmh wt at ae oe. eke a man ee a ee 
5511 015762 005212 T5200: INC ;UPDATE TEST NUMBER 
5512 015764 022712 000200 CMP #300, (R2) ; SEQUENCE ERROR? 
5513 015770 001013 BNE SB7 :BR TO ERROR HALT ON SEQ ERROR 
5514 015772 012767 177400 000030 MOV #177400, SB7X MOVE PATTERN TO WORK LOCATION 
5515 016000 012700 015740 MOV #SB7XAD=-72,RO “MOVE OFFSET POINTER TO RO 
5516 0160046 000370 000072 SWAB @72(RO) zs TRY SWAB MODE 7 
5517 016010 027027 000072 000377 CMP @72(RO) , 4377 + CHECK RESULTS 
5518 016016 001406 BEQ TS201 
5519 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5520 é CONDITIONAL BRANCH INST. AND <==== 
5521 ; REPLACE THE MOVE INSTRUCTION <==== 
5522 : WHICH FOLLOWS W/ 764 ¢€zzs= 
5523 016020 SB7: 
5524 016020 012742 000406 MOV #406,-(R2) sMOVE TO MAILBOX # xeeenee 406 teeneee 
5525 016024 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
5526 016026 000000 HALT sRESULT OF SWAB INCORRECT 
5527 ; OR SEQUENCE ERROR 
5528 016030 000000 SB7X: 0 ;WORK LOCATION 
5529 016032 016030 SB7KAD: SB7X sPOINTER TO WORK LOCATION 
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CJKDBB.P11 19=JUN=79 10:52 T200 TEST MODE 7 W/ SWAB INST. SEQ 0111 
5531 
5532 FRR EERE REE RRR RRR RARER EERE ERE REAR ERERREEREERAEERERE REE 
5533 3 
5534 ; THIS TEST VERIFIES ALL LEGAL MODES OF THE JMP INSTRUCTION. 
5535 sBECAUSE OF THE NATURE OF THE INSTRUCTION UNDER TEST, THIS TEST 
5536 sUTILIZES ene DIFFERENT TECHNIQUES. THE CODE IS NOT EXECUTED 
5537 :INA Ne ag la ASHION. THE DIFFERENT MODES ARE EXECUTED IN ORDER 
5538 ; FROM 1-7; HOWEVER, THE CODE IS ARRANGED SO THAT CONTROL LEAP 
e270 a THRU THE TEST CODE. THE ORDER OF APPEARANCE OF THE CODE 
5541 : JMP MODE 1 
5542 JMP MODE 3 
5543 : JMP MODE 2 
5544 JMP MODE 4 
5545 JMP MODE 6 
5546 ; JMP MODE 5 
5547 ; JMP MODE 7 
5548 AN INTERNAL SEQUENCE TEST (JMPSEQ) IS USED TO INSURE THAT THE 
5549 JUMPS ARE OCCURRING IN THE PROGRAMMED SEQUENCE. 
5550 THE TEST IS MADE UP OF SEVERAL BLOCKS OF CODE. EACH CODE 
5551 “BEGINS WITH A LABEL WHICH INDICATES THE MODE BEING EXECUTED IN 
5552 ;THAT BLOCK. A SIMPLE PROCEDURE IS FOLLOWED IN EACH BLOCK. FOR 
5553 EXAMPLE THE CODE Se ge AT JMP3 WILL FIRST COMPARE THE RESULTS 
5554 ;OF THE PREVIOUS MODE 2 JUMP. (ANY REGISTER CHANGES ARE VERIFIED 
5555 SAND THE SEQUENCE MOHECK IS MADE). THEN THE REGISTERS ARE SETUP 
5556 ;FOR A MODE 3 JUMP TO THE NEXT TEST BLOCK (HERE, JMP4), THE SEQUENCE 
5557 : CHECKER IS UPDATED AND THE JUMP IS EXECUTED 
5558 IF A FAILURE OCCURS, THE SEQUENCE CHECKER WILL ASSIST IN 
5559 «DETERMINING JUST WHICH MODE FAILED. IF THE SEQUENCE IS CORRECT 
5560 ; THEN THE ERROR DETECTED WAS A MODE ae (E.G. FAILURE OF THE 
aee3 REGISTER TO BE INCREMENTED IN MODE 2 JUMP 
5563 UTTTITITITITITITITITTTETETITETT TELE LETT TTT TT LTTE LETTE TTT T TTT 
5564 S TEST 201 TEST THE JMP INSTRUCTION IN ALL MODES 
5565 DRT KKK RE KRKRKRKEKKKEKEHEKKKKEKEREEEKKEREREKEEEKE CREE EKER EEE 
5566 016034 005212 7$201: INC (R2) ;UPDATE TEST NUMBER 
5567 016036 022712 000201 CMP #201, (R2) ; SEQUENCE ERROR? 
5568 016042 001150 BNE JMPCK+6 ;BR TO ERROR HALT ON SEQ ERROR 
5569 016044 005067 000326 CLR JMPSEQ sESTABLISH A SEGUENCE CHECKER 
5570 016050 912700 016130 MOV #JMP2 ,RO 7SET RO0=JUMP TARGET 
5571 016054 000110 JMP (RO) :TRY JMP MODE 1 
5572 016056 022700 016060 JMP3: CMP #.+2,R0 :CHECK RESULT OF MODE 2 JUMP 
5573 016062 001404 BEQ JMP3A 
5574 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5575 F CONDITIONAL BRANCH INST. AND <==== 
5576 : REPLACE THE MOVE INSTRUCTION ¢€zzs2 
5577 : WHICH FOLLOWS W/ 767 ¢€zzss 
5578 016064 012742 000407 MOV 4407,-(R2) sMOVE TO MAILBOX # *xeeeeee 407 teennne 
5579 016070 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
5580 016072 000000 HALT REGISTER VALUE AFTER JMP MODE 2 INCORRECT 
5581 016074 026727 000276 000001 UJMP3A: CMP JMPSEQ,41 MAKE SURE JMPS ARE IN SEQUENCE: JMPSEQ=1? 
5582 016102 001404 BEQ JMP3B 
5583 ; TO SCOPE: ee THE RIGHT BYTE OF THIS 


<€3=z 
ONDITIONAL BRANCH INST. AND <== 
REPLACE THE MOVE INSTRUCTION <== 
WHICH FOLLOWS W/ 757 <== 


vou uu 
ee 


Ww 
Sotote 
RAR 


CJKDB=B hig « CPU_DIAG. 
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016130 
016134 


016226 


016230 
016236 


016240 


016260 
016264 


012742 


000130 
016160 
005767 
001404 


012742 


012742 
005242 


000090 
022767 
001404 


012742 


022767 
001404 


012742 
005242 
000000 
012700 


005267 
00016C 


022767 


000410 


000242 


000411 


000224 
016056 
016130 


000412 
000002 000172 
000413 


016266 
000150 


000004 000140 


000414 


016716 
000116 
177402 


000003 000104 


MACY11 30A(1052) 
1201 


JMP5 : 


19=JUN=79 


#410,=(R2) 
-(R2) 


#IIMP4,RO 
JMPSEQ 
a(RO)+ 


JMPSEQ 
JMP2A 


#411,=(R2) 
-(R2) 


(RO 
#1JMP4+2,R0 
JMP4A 


#412,-(R2) 
-(R2) 


#2, JMPSEQ 
JMP4B 


#413,-(R2) 
-(R2) 


#JMPS+2,RO 
JMPSEQ 
-(RO) 


#4, IMPSEQ 
JMP6A 


#414,-(R2) 
-(R2) 


# IMP7+376,RO 
JMPSEQ 


~376(RO) 
#3, JMPSEQ 


+ 
11:08 PAGE 112 
TEST THE JMP INSTRUCTION IN ALL MODES 


REEREKRE 


sMOVE TO MAILBOX # exe" 410 
- SET MSGTYP TO FATAL ERROR 


UPDATE SEQUENCE CHECKER 
TRY JMP MODE 3 
‘ADDRESS INDIRECT JUMP 


CHECK THAT JMPS ARE IN SEQUENCE: JMPSEQ=0? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 742 

MOVE TO MAILBOX # **xxeeee 477 

SET MSGTYP TO FATAL ERROR 

SHOULD BE HERE FROM JMP MODE 1 ONLY 

[UPDATE SEQUENCE CHECKER 

SET RO=JUMP TARGET 

TRY A JUMP MODE 2 TO ‘‘JMP3"' 

CHECK RESULT OF REGISTER IN MODE 3 JUMP 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 726 

sMOVE TO MAILBOX # x**%xxaKx 412 

;SET MSGTYP TO FATAL ERROR 

[REGISTER VALUE AFTER MODE 3 JUMP INCORRECT 

;CHECK JUMP SEQUENCE: JMPSEQ=2? 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 716 

;MOVE TO MAILBOX # saxaeee 413 
:SET MSCTYP TO FATAL ERROR 
SHOULD BE ONLY FROM MODE 3 JUMP 
;SET UP POINTER TO JUMP TARGET 
UPDATE SEQUENCE CHECKER 

TRY JUMP MODE 4 TO ‘‘IMP4"' 


CHECK THAT JUMPS ARE IN SEQUENCE: JMPSEQ=4? 
; TO SCOPE: CLEAR THE RIGHT BYTE +! THIS 
; CONDI T IONA\ INS 


L BRANCH AND 
REPLACE THE MOVE INSTRUCT 10N 
; WHICH FOLLOWS W/ 701 

sMOVE TO MAILBOX # xeexnwee 414 

sSET MSGTYP TO FATAL ERROR 

:SHOULD BE HERE ONLY FROM MODE 5 JUMP 
sSET UP OFFSET POINTER TO JUMP TARGET 
;UPDATE JUMP SIONS 

TRY MODE 6 J 


CHECK THAT JUMPS ARE IN SEQUENCE: 


REREKKK 


AAAA 


RERKEKE 


RaEKKEE 


gekeene 


JMPSEQ= 3? 


SEQ 0112 
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CJKDBB.P11 19=JUN=79 10:52 TEST THE JMP INSTRUCTION IN ALL MODES SEQ 0113 
5643 016272 0017404 BEQ JMPSA 
5644 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5645 é CONDITIONAL BRANCH INST. AND ¢€2222 
5646 ; REPLACE THE Hye INSTRUCTION <==== 
5647 WHICH FOLLOWS W/ 663 <=s22 
5648 016274 012742 000415 MOV #415,=-(R2) *MOVE TO MAILBOX # xtaeeee 415 teannee 
5649 016300 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
5650 016302 000000 HALT :SHOULD ONLY BE HERE FROM MODE 4 JUMP 
5651 16304 012700 016320 JMP5A: MOV #IJMP5+2,R0 SET UP POINTER TO INDIRECT JUMP ADDR. 
5652 016310 C05267 000062 INC JMPSEQ ;UPDATE JUMP SEQUENCE 
5653 016314 000150 JMP a- (RO) ;TRY JUMP MODE 5 TO ‘‘JMP6"' 
ste: 016316 016230 IJMPS: JMP6 ; INDIRECT ADDRESS POJNTER 
5656 016320 022767 000005 000050 JMP7: CMP #5, JMPSEQ s CHECK JUMPS IN SEQUENCE: JMPSEQ=5? 
5657 016326 001404 BEQ JMP7A 
5658 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5659 é CONDITIONAL BRANCH INST. AND <==== 
5660 : REPLACE THE MOVE INSTRUCTION <==== 
5661 ; WHICH FOLLOWS W/ 645 ¢€z222 
5662 016330 012742 000416 MOV #416,-(R2) sMOVE TC MAILBOX # *exKmeee 416 xaennnn 
5663 016334 005242 INC -(R2) 7SET MSGTYP TO FATAL — 
5664 016336 00000 HALT + SHOULD ONLY BE HERE FROM MODE 6 JUMP 
5665 016340 012700 016364 JMP7A: MOV #1 JMP+10,R0 ET OFFSET POINTER TO INDIRECT ADDR. 
5666 016344 005267 000026 INC JMPSEQ “UPDATE JUMP SEQUENCE 
5667 016350 000170 177770 JMP a-10(RO) :TRY MODE 7 JUMP 
re: 016354 016356 TIMP: JMPCK S INDIRECT ADDRESS 
5670 016356 026727 000014 000006 JMPCK: CMP JMPSEQ,46 ;CHECK JUMPS IN SEQUENCE: JMPSEQ 
5671 016364 001405 BEQ TS202 
5672 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
5673 : CONDITIONAL BRANCH INST. AND <==== 
5674 : REPLACE THE MOVE INSTRUCTION <==== 
5675 2 WHICH FOLLOWS W/ 626 <==== 
5676 016366 012742 000417 MOV #417,-(R2) sMOVE TO MAILBOX # xeexeee 417 nxeetenne 
5677 016372 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
5678 016374 000000 HALT + SHOULD ONLY BE HERE FROM MODE 6 JUMP 
5679 ; : OR SEQUENCE ERROR 
5680 016376 00900C JMPSEQ: 0 
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SRR ERR RRR RRR RK KEE EERE KERR EKER EKER KERR KEKE REE ERE KEKE 


THIS TEST poy A. ALL LEGAL MODES OF THE JSR INSTRUCTION. 
THE CONCEPT OF LEAP FROGGING AND SEQUENCE CHECKING (JSRSEQ) IS 
: IDENTICAL TO THAT USED IN JMP TEST (SEE PREVIOUS TEST). EACH 
BLOCK OF CODE VERIFIES THE PREVIOUS JSR BY CHECKING THE SEQUEN CE, 
er te THAT THE PC _ WAS SAVED IN THE SPECIFIED SeTeTER a CHECK ING 
T THE SP WAS DECREMENTED, CHECKING THAT THE REGISTER WAS 
‘SAVED ON THE STACK, AND FINALLY CHECKING THAT ANY MODE ADDRESS 
REGISTER ALTERATIONS (E.G. INCREMENT REGISTER IN MODE 2) WERE 
‘gunna R1 IS USED AS THE REGISTER IN ALL JSR INSTRUCTIONS. 
IF A FAILURE OCCURS, THE SEQUENCE CHECKER WILL ASSIST IN 
: DETERMINING JUST WHICH MODE FAILED. IF THE SEQUENCE IS CORRECT 
; THEN THE ERROR DETECTED WAS A FUNCTIONAL FAILURE (E.G., INCORRECT 
:REGISTER SAVED). 


TAO IOI ICICI IOIOIOISIOISISIOI IOI I IOI IOI IOI IOI IIIT IIIT RISOTTO ISSA AOR PE ARITA AA AA AAA AAA 
STEST 202 TEST JSR INSTRUCTION W/ ALL MODES 
FIR ICICI III IITA IASI IAIISI IIS SSSI III IIIA IIIA IIIA SAA ISA ASISAA SSAA SAI AS ANAC AC 
005212 TS202: INC (R2) sUPDATE TEST NUMBER 
022712 000202 CMP #202, (R2) ; SEQUENCE ERROR? 
001001 BNE JSRO [BR TO ERROR HALT ON SEQ ERROR 


000402 BR JSR1 
000137 017046 JSRO: @AJSRCK1 


001000 JSR1: A#STBOT ,R6 sSET STACK POINTER 

016530 MO #JSR2,RO SET TARGET ADDRESS 

017026 @AJSRSEQ s INITIALIZE SEQUENCE CHECKER 
R1 INITIALIZE R1 


R1 
R1, (RO) ;TRY JSR MODE 1 
; TO SCOPE: REPLACE THE MOVE INSTRUCTION 
SRIA : FOLLOWING W/ 774 
J “As 


012742 000420 MO #420,-(R2) sMOVE TO MAILBOX # xeeeeee 420 teenKne 
005242 -(R2) :SET MSGTY® TO FATAL ERROR 
000000 JSR MODE 1 FAILED 


022737 000001 017026 JSR3: 41,04 JSRSEQ CHECK SEQUENCE: JSRSEQ=1? 
BN JSR3A :FRRANCH IF OUT OF SEQUENCE 
016612 R1,AJSR4 ;PROPER PC SAVED? 


JSR3A BRANCH IF PC WRONG 
000776 Y ASTBOT~2,R6 :STACK POINTER DECREMENTED? 
BRANCH IF SP WRONG 


JSR 
125252 #125252, (R6) ;REG ae ON STACK? 

JSR3A BRAN F REG. NOT SAVED 
016452 te :MODE INCREMENT CORRECT? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 737 


012742 000421 ; #421,-(R2) ;MOVE TO MAILBOX # xk#eeee 421 wenenee 
005242 -(R2) ‘SET MSGTYP TO FATAL ERROR 


AAAA 
“wut 
“uu 
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016516 000000 ;JSR MODE 3 MALFUNCTIONED 
016520 017026 JSR3B: A JSRSEQ [UPDATE SEQUENCE CHECKER 
016524 37 016612 J R1,@4JSR4 TRY JSR MODE 4 


016530 617026 JSR2: @4JSRSEQ + CHECK SEQUENCE: JSRSEQ=0? 
BN JSR2A ANCH IF OUT OF SEQUENCE 

016440 R1,AJSRIA ; PROPER PC SAVED? 

JSR2A BRANCH IF *' WRONG 
000776 ASTBOT=2 ,R6 7R6 DECREMENT 

JSR2A BRANCH IF Re IS INCORRECT 
177777 —_ REGISTER SAVED? 

J 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 713 


012742 000422 "Mo #422,-(R2) ZMOVE TO MAILBOX # xkeKKHR 422 eeeeene 
-(R2) ;SET MSGTYP TO FATAL ERROR 
tJSR MODE 1 MALFUNCTIONED 


001404 


AAKA 


001000 : ASTBOT ,R6 
125252 MO #125252,R1 E R1 
017026 @A4JSRSEQ sUPDATE SEQUENCE CHECKER 
016450 #JSR3,RO SET TARGET ADDRESS 
R1, (RO) + TRY JSR MODE 2 


000002 017026 : #2, QA4JSRSEQ CHECK SEQUENCE: JSRSEQ=2? 
JSR4A - }BRANCH IF 


OUT OF SEQUENCE 
016530 #JSR2,R1 sPROPER PC SAVED? 


001404 JSR4B 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
d CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 667 
JSR4A: 


012742 000423 MO #423,-(R2) sMOVE TO MAILBOX # *aeexee 423 teennnn 
-(R2) :SET MSGTYP TO FATAL ERROR 
HA :JSR MODE 3 MALFUNCTIONED 
017026 JSR4B: @4JSRSEQ [UPDATE SEQUENCE CHECKER 
016720 MO AJSR5+2 RO SET TARGET ADDRESS 
R1,-(RO) TRY JSR MODE 4 


000004 000146 JSR6: #4, JSRSEQ = CHECK SEQUENCE: JSRSEQ=4? 
BN JSR6A CH IF OUT OF SEQUENCE 
016764 #JSR7,R1 “ PROPER PC SAVED? 
JSR BRANCH IF PC WRONG 
017022 it tana :MODE 5 REGISTER CORRECT? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 644 


012742 000424 : #424 ,-(R2) :MOVE TO MAILBOX # «xeeeee 424 exenene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :JSR MODE 5 FAILED 


001404 


AAAA 
“wn 
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005237 017026 JSR6B: 4 JSRSEQ ; UPDATE spy CHECKER 
000046 J R1,JSR7 TRY JSR MODE 6 
000003 000102 JSRS: oc JSRSEQ >CHECK SEQUENCE: JSRSEQ=3? 
BN SR5A :BR ANCH IF OUT OF SEQUENCE 
016652 #J5R6, R1 PROPER PC ie ca 
JSR5A ;BRANCH IF PC WRONG 
016716 #JISRS,RO CHECK MODE 4 REGISTER 


016740 JSR5B 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 622 
016742 JSRSA: 


012742 000425 MO #425 ,-(R2) sMOVE TO MAILBOX # xxteeee 425 xeennnen 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 H. JSR MODE 4 MALFUNCTIONED 

005237 017026 JSR5B: @AJSRSEQ UPDATE SEQUENCE CHECKER 

012700 017024 M #JSR6AD+2,RO POINT RO TO TARGET ADDRESS 

004150 R1,a-(RO) TRY JSR MODE 5 


022737 000005 017026 JSR7: #5 ,AAJSRSEQ CHECK SEQUENCE: JSRSEQ=5? 
001003 BN JSR7A BRANCH IF OUT OF SEQUENCE 
022701 016716 rt PROPER PC SAVED? 


001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 602 


AAAA 


012742 000426 #426,-(R2) sMOVE TO MAILBOX # *exKxee 426 keennne 
005242 -(R2) 2SET MSGTYP x FATAL ERROR 
000000 HA JSR MODE 6 FAILED 
005237 017026 : @AJSRSEQ SUPDATE SEQUENCE CHECKER 
017016 004177 000002 JS R1,@JSRCKAD : TRY JSR MODE 7 


017022 016652 ; MODE 5 TARGET ADDRESS 
017024 017030 : MODE 7 TARGET ADDRESS 
017026 000000 JSRSEQ: 0 SEQUENCE CHECKER 


017030 022767 000006 177770 JSRCK: #6, 7 ee inh a ae JSRSEQ=6? 
BN JSRCK1 F QUT o SEQUENCE 
017022 HSROAD, RI PROPER PC SAVED? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLCWS W/ 560 
JSRCK1: 


000427 M #427 ,~(R2) sMOVE TO MAILBOX # xkxeKxee 427 Keennne 
-(R2) SET MSGTYP TO FATAL ERROR 
017054 JSR MODE 7 MALFUNCTIONED 
: OR SEQUENCE ERROR 
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PPI P tiie rir iti iri iii ii titi iii iit iii t titi titi tit titi i titi tit 
; THIS TEST VERIFIES THE RTS INSTRUCTION. THE STACK POINTER 

31S_INITIALIZED AND A TEST PATTERN STORED "3 STACK. RO IS LOADED 

[WITH RETURN ADDRESS. AN RTS IS EXECUTED, AT fHE TARGET 

ADDRESS, A CHECK IS MADE THAT RO WAS PROPERLY “RESTORED FROM THE 


LRAT ERR EERE R EERE EERE EERE EERE ERR RRR EEE eee 
TTEST 203 TEST RTS INSTRUCTION 
PPI ti titi ier t tite titi tii iii iil i iii iti itt titi tt itt tii t titi titi tit itt) 
S203: (R2) UPDATE TEST NUMBER 
000203 #203, (R2) ees ERROR? 
TS204- 10 TO ERROR HALT ON SEQ ERROR 
001000 R6 SINITIALIZE STACK girty 
052525 #52805, -(R6) s INITIALIZE TOP OF STA 
017114 MOV #RTS1,RO INITIALIZE RETURN REGISTER 
RO TRY RTS THROUGH RO 
: TO SCOPE: REPLACE THE ge INSTRUCTION 


012742 000430 #430,-(R2) :MOVE TO MAILBOX atenene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 H RTS FAILED 

022700 052525 : MP ootar RO CHECK THAT RO RESTORED FROM STACK 
001404 TS204 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


AAAA 
noun 


é WHICH FOLLOWS W/ 761 
012742 000431 4431,-(R2) sMOVE TO MAILBOX # *xeaxee 43] seneene 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
017130 000000 7RTS MALFUNCTIONED 
; OR SEQUENCE ERROR 
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L FEAR RARER EERE ERERERERAEE RARER REREERERER EERE 


THESE NEXT FOUR TESTS VERIFY THE FUNCTIONING OF A GROUP 
“OF FOUR INSTRUCTIONS. THE GROUP CONSISTS OF THE INSTRUCTIONS: 
:MOV, BIC, BIT, AND BIS. THESE INSTRUCTIONS ARE SIMILAR IN THE 
WAY THEY EFFECT THE C AND V BITS. THEY ALL LEAVE THE V-BIT 
: CLEAR AND THE C=-BIT UNAFFECTED. 
THE TEST PROCEDURE IS AS FOLLOWS: THE N, Z, AND V BITS 
ARE LOADED WITH THE COMPLEMENT OF THE EXPECTED RESULTS, THE C-BIT 
15 LOADED WITH THE DESIRED RESULT. THE INSTRUCTION IS EXECUTED 
WITH DIFFERENT DATA PATTERNS AND THE RESULTS ARE VERIFIED WITH 
7A SERIES OF CONDITIONAL BRANCH INSTRUCTIONS. THE DATA IS CHOSEN 
PRODUCT ALL POSSIBLE COMBINATIONS OF THE C AND V BITS. 


TTT ITITITITITITITTT LITT TI TIT TLTTITI TT TTT TTT TTT LTTE LETT TTT Tee 
STEST 204 TEST MOV INSTRUCTION 
UII IIIIIIDIDISIIIIIOIIDIOIOIIIIIOIISIIOIIOIUIDIOIUIDISISIIIOIIUIDIOIUIOIISIIDIDIDIOIUIUIIIUISOISIOIUIDIE non iitt 
017132 7S204: INC (R2) ;UPDATE TEST NUMBER 
c 000204 : CMP #204, (R2) ; SEQUENCE ERROR? 
BNE TS205-10 ;BR TO ERROR HALT ON SEQ ERROR 
SCC :CC=0110 
+CLN!CLC 


100000 MOV #100000 ,RO :CC=1000 
BLOS MOov1 
BVS MOV1 
017156 BMI MOV2 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 770 


017160 
0004 32 #432,-(R2) sMOVE TO MAILBOX # «keane 432 xennnne 
-(R2) SET MSGTYP TO FATAL ERROR 
:MOV DID NOT SET CC'S CORRECTLY 


3CC=1011 
000000 5 :CC=0101 

:C OR Z 

3V=1? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 


012742 000433 #433,-(R2) sMOVE TO MAILBOX # *kannee aeetnee 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
017214 000000 :MOV DID NOT SET CC'S CORRECTLY 
; OR SEQUENCE ERROR 
sSERERRERRRREREREEERE NEE TEREREEERSERESERESRERSE RENEE RSE R ENE R ENR E EERE CER E ENTREE TENS 
TEST 205 TEST BIT INSTRUCTION 
DUIS IOIUIUIUIIOIIIIOUUIIUIIIIIUU IR EER EER EERE ERR REE EERE EERE ERE 
017216 005212 7S205: INC (R2) ;UPDATE TEST NUMBER 
017220 022712 000205 #205, (R2) ; SEQUENCE ERROR? 
017224 001024 TS206-10 :BR TO ERROR HALT ON SEQ ERROR 


= 0? 


AAAA 


Wwouow i 
Wowie 
iououeu 
ed | 








CJKDB-8 abbr « CPU ay 


CJKDBB.P 


017226 
017232 


017246 


017250 


017256 


017260 
017262 
017264 
017270 
017272 
017274 


017276 


19=JUN=79 
912700 


005242 
000000 


012742 
005242 
000000 


005242 
000000 


10:5 
100001 


100000 


0004 34 


077776 


0004 35 


000206 
177777 


077777 


0004 36 


100000 


FREER ARERR REE EERERA EEE EEERERAEEE EERE EEEREERREKERRER ERED 


PERERA AERA EAR ERR ERE REAR ERERERREERAERAEREEREREEEREERR EKER Re RE eeeee 


MACY11 30A(1052) 19=JUN=-79 
T7205 TEST BIT INSTRUCTION 
MOV #100001,RO 
SCC 
+CLN! 
BIT #100000,RO 
BLO IT1 
BVS BIT] 
BMI BIT2 
BIT1: 
MOV etek eae 
INC -(R 
HAL T 
Bli2: SCC 
CLZ 
BIT #77776,RO0 
BHI BIT3 
BVS BIT3 
BPL TS206 
BITS: 
MOV #435,-(R2) 
INC -(R2) 
HALT 
STEST 206 
TS206: INC (R2) 
CMP #206, (R2) 
BNE TS207-10 
MOV #177777,RO 
SCC 
+CLN!CLC 
Ic #77777,RO 
BLOS BIC] 
BVS BIC1 
BM] BIC2 
BIC1: 
MOV #436,-(R2) 
INC -(R2) 
HALT 
BIC2: SCC 
CLZ 
BIC #100000,RO0 
BH] BIC3 


C 10 
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:€C=0110 
:CC=1000 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


sMOVE TO MAILBOX # seeeeee 434 sennene 
;SET MSGTYP TO FATAL ERROR 

BIT DID NOT SET CC'S CORRECTLY 

3CC=1011 


2CC=0101 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 753 


:MOVE TO MAILBOX # seaeeee 435 seenene 
;SET MSGTYP TO FATAL ERROR 

:BIT DID NOT SET CC'S CORRECTLY 

; OR SEQUENCE ERROR 


TEST BIC INSTRUCTION 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

;BR TO ERROR HALT ON SEQ ERROR 
:€C=0110 


:CC=1000 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 


;MOVE TO MAILBOX # seaeeee 436 teenene 
iSET MSGTYP TO FATAL ERROR 
:BIC DID NOT SET CC*S CORRECTLY 


:C€C=0101 


AAAA 


NAAA 
iu u 
nuh u 
nouthu 
ieun iu 


A AAA 


ouwouw 


iuut 
tuud 
iunhu 


“wud 


wu ou 


D 10 
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(JK DBB.P11 19=JUN=79 10:52 7206 TEST BIC INSTRUCTION ° SEQ 0120 


017362 = =102401 BYS BIC3 
364 100004 BPL 7$207 
; TO SCOPE: caeet THE RIGHT BYTE OF THIS 
; ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 


4437 ,=-(R2) ;MOVE TO MAILBOX # seeenee 437 aeennee 
:SET MSGTYP TO FATAL ERROR 
;BIC DID NOT SET CC'S CORRECTLY 
; OR SEQUENCE ERROR 


LEAR AAAARAARAAEEA EERE E ERE RAREAAAARERAAAAAARARAEREEERARERERH EKER REH EERE REE ee ee 


STEST 207 TEST BIS INSTRUCTION 


FRA EAA AAA AEAAAO KARE EAREREAARERARERERAEEEEHEREREEREHERERERKREER EKER EKER eRe ee 


75207: (R2) ;UPDATE TEST NUMBER 
#207, (R2) SEQUENCE ERROR? 
mae TO ERROR HALT ON SEQ ERROR 
;CC=1010 


:C€C=0100 RO=6 


A AAA 
“ou 

i 
funn 
"oom 


017426 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


000440 : #440,-(R2) sMOVE TO MAILBUX # s#eaeee 440 seenees 
=(R2) :SET MSGTYP TO FATAL ERROR 
:B1S 01D NOT SET CC'S CORRECTLY 


177777 #177777,RO :¢C=1001 
BIS3 


noun 


017430 


U17456 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 752 


017460 : 
017460 012742 000441 MO #441,-(R2) sMOVE TO MAILBOX # seeenee 44] seeneee 
017464 005242 ~(R2) 7SET MSGTYP TO FATAL ERROR 
017466 000000 :BIS DID NOT SET CC°S CORRECTLY 
; OR SEQUENCE ERROR 








CJKDB=8 wai + CPU_DIAG. 
P11 pnarere 10:52 


CJKDBB.P 


017470 


017516 


017520 


pa Gee PP ee PP 
~N 
Ww 
oO 
N 


005272 


102404 


012742 
005242 
000000 


000210 
077777 


000442 


077777 


000443 


MACY11 30A(1052) 
1207 


19=JUN=79 
TEST BIS INSTRUCTION 


E 10 
11:08 PAGE 121 


SEQ 0121 


PERERA AAAAAAEAREAE REAR RAA REAR RARER ERA EEAREEEREREEEK AERA eee eee 


[DEC INSTRUCTIONS. 
:BITS THE SAME; 
;UPON THE DATA RESULTS. 


THESE NEXT TWO TESTS VERIFY THE FUNCTIONING OF THE INC AND 


THESE INSTRUCTIONS BOTH EFFECT THE C AND V 
THE C-BIT_IS LEFT UNCHANGED AND THE V-BIT a DEPENDENT 
THE SAME PROCEDURE IS USED. OND I TION 


THE C 


:CODE BITS ARE INITIALIZED, THE INSTRUCTION IS EXECUTED AND THE 
SRESULTS ARE VERIFIED WITH A SERIES OF CONDITIONAL BRANCH INSTRUCTIONS. 
THIS PROCEDURE IS REPEATED WITH SEVERAL DATA PATTERNS TO PRODUCE 
“pala COMBINATIONS OF THE C AND V BITS. 


ITITIIII IIT I TTT T TILL LTT LTT TTI TITI LETTE TTTTTE LTTE TTT TTT Teeter 


TEST INC INSTRUCTION 


Seige” toe ne oa a eee Gee name oo oc ate eee a 


STEST 21 
S210: 


INC1: 


INC2: 


INC3: 


INC4: 


0 


(R2) 
#210, (R2) 
TS211-10 
#077777 ,RO 


#442,-(R2) 
-(R2) 


#77777 ,RO 


UPDATE TEST NUMBER 
caeie te ERROR? 
BR TO sen HALT ON SEQ ERROR 
“RO= 077 
:CC= 0700. 


:C€C=1010 RO=10000 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 767 


sMOVE TO MAILBOX # *xxaxe 442 
;SET MSGTYP TO FATAL ERROR 

INC DID_NOT SET CC°S CORRECTLY 
3RO=177777 

:CC=1011 


:CC=0101 = RO=0 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 752 


sMOVE TO MAILBOX # *xeeeeee 443 
7SET MSGTYP TO FATAL ERROR 

:INC DID NOT SET CC*S CORRECTLY 
€C=1110 


:€¢=0000 


RO=1 


RAREKKKEK 


Reatenre 


AAAA 


ANAAA 
ee 


nee nw i 
in Wu 
ee 





CJKDB=8 DCF 11=AA CPU _DIAG. 


CJKDBB.P11 


6096 
6097 
6098 


017576 
017576 


017706 


19=JUN=79 10:52 


017742 
005242 
000000 


005212 


103404 


012742 
005242 

000 
102004 


012742 
2 


100404 


000444 


000211 
000002 


000445 


000446 


MACY11 30A(1052) 
1210 


INCS: 





F 10 
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TEST INC INSTRUCTION 


MOV #444 ,=(R2) 
INC -(R2) 
HALT 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS w/ 740 


sMOVE TO MAILBOX # weeenen 444 ceennne 
:SET MSGTYP TO FATAL ERROR 

: INC DID NOT SET CC'S CORRECTLY 

: OR SEQUENCE ERROR 


SEQ 0122 


FERRER KERR ERE REE KERERRRERERRRERREKEKEEEREEKEEKERRERREEREE EERE RE 


1 TEST DEC INSTRUCTION 


i toe Co eee a eee Sate aoe Te 


sTEST 21 
7S211: 


DEC1: 


DEC3: 


DEC4: 


DECS: 


INC (R2) 
CMP #211, (R2) 
BNE TS212-10 


MOV #2,R0 
SCC 

DEC RO 
BMI DEC? 
BEQ DEC 
BVS DEC} 
BCS DEC? 


MOV #445 ,-(R2) 
-(R2) 


HAL T 

SEC 

CLZ 

DEC RO 
BHI DEC3 
BMI DEC3 
BYC DEC4 


MOV #446,~-(R2) 
-(R2) 


HALT 

Scc 

ee 
BLOS DECS 
BVS DEC 
BM] DEC6 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
:BR TO ERROR HALT ON SEQ ERROR 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 767 


MOVE TO MAILBOX # xxxxxme 445 kamnnne 
:SET MSGTYP TO FATAL ERROR 
rye ttt NOT SET CC'S CORRECTLY 


:CC=0101 RO=0 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 755 


sMOVE TO MAILBOX # «exnwee 446 tenner 
:SET MSGTYP TO FATAL ERROR 
see sonio NOT SET CC'S CORRECTLY 


:CC=1000 RO=177777 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS wW/ 743 


AAAA 


AAAA 


“uuu 


CUKDB=B DCF11=AA CPU DIAG. 
CJKDBB.P11 19=JUN=79 10:52 


017740 
017740 
017744 
017746 


012742 000447 
005242 


077777 


103404 


012742 
005242 
900000 


MACYi1 30A(1052) 
1211 


G 10 
19=JUN=79 11:08 PAGE 123 
TEST DEC INSTRUCTION 


MOV 
INC 
HALT 
BIC 


#6447 ,-(R2) sMOVE TO MAILBOX # seeanne 447 sevanee 
2) :SET MSGTYP TO FATAL ERROR 

;DEC DID NOT SET CC'S CORRECTLY 

#77777,RO ;RO0=100000 

:CC=0101 


3€C=1011 
:CC=0011 


=( 


RO=77777 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 726 


#450,-(R2) sMOVE TO MAILBOX # sxaawee 450 saenene 
-(R2) ;SET MSGTYP TO FATAL ERROR 

:DEC DID NOT SET CC°S CORRECTLY 

; OR SEQUENCE ERROR 


e 
7 
° 
. 
o 


AAAA 


SEQ 0123 
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CJKDBB.P11 19=JUN=79 10:52 T211 TEST DEC INSTRUCTION SEQ 0124 


FERRER RRR ERE RRR KERR EREREERREERAREEERERE REED 


THESE NEXT THREE TESTS VERIFY THE FUNCTIONING OF THE CLR, 
THESE THREE INSTRUCTIONS ALL LEAVE 
; GAIN, THE CONDITION CODES ARE PRESET, 
THE INSTRUCTION EXECUTED AND THE RESULTS CHECKED WITH CONDITIONAL 
BRANCH INSTRUCTIONS. THE PROCEDURE IS REPEATED TO PRODUCE OTHER 
; COMBINATIONS OF CONDITION CODES. 


TRA EI ISIS IIIS IOI IIIIIIIIIUOIISOIIISIISISIIIUDI IIIS EI Erni etnies 


STEST 212 TEST CLR INSTRUCTION 
SAREE EKER REE EKER EERE REE EKER EEE ERE EEREEREREREEKEKEEE EERE 
017750 005212 TS212: I! (R2) ;UPDATE TEST NUMBER 
000212 C #212, (R2) : SEQUENCE ERROR? 
T5213-10 BR 10, ERROR HALT ON SEQ ERROR 


-3€C=0700 —RO=0 


017774 001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 770 


017776 


017776 012742 000451 4451,-(R2) sMOVE TO MAILBOX # *xxeeee 45] xeeenne 
020002 005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :CLR DID NOT SET CC*S CORRECTLY 
> OR SEQUENCE ERROR 


eg aad gala tbc a lta il ale 


TEST 213 TEST TST INSTRUCTION 
Seen eee deka ee eee Rome a amemn te ce ee 
75213: (R2) ;UPDATE TEST NUMBER 
000213 #213, (R2) SSEQUENCE ERROR? 
1S214-10 2BR_TO ERROR HALT ON SEQ ERROR 


:€C=0100 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
3 CONDITIONAL BRANCH INST. AND 
Z REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS w/ 770 


012742 000452 #452,-(R2) sMCVE TO MAILBOX # xxennee 452 sennnee 
2 -(R2) ;SET MSGTYP TO FATAL ERROR 
TEST DID “rH tee CC*S CORRECTLY 
RO MAKE 7 NEGATIVE 
;CC=0111 


“uuu 





CJKDB=B DCF11=AA CPU_DIAG. 


CJKDBB.P11 


020116 
020120 


020122 


020146 


020150 


620156 


19=JUN=79 10:52 


000250 


100404 


012742 
005242 


012742 
005242 
00000 


000453 


000214 
170000 


000454 


000455 
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3¢C=1000 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 


:MOVE TO MAILBOX # sxxexee 453 senenne 
ZSET MSGTYP TO FATAL ERROR 
:TEST DiD NOT SET CC'S CORRECTLY 

OR SEQUENCE ERROR 


AAAA 


tl 


SEQ 0125 


FERRER ERR ERR ERRRRKEEREEREREEKKEEEREEEERERERERREEERERERERKEEREREREKER EERE 


TEST SWAB INSTRUCTION 


a a. a hae a nn Ce ee 


MACY11 30A(1052) 19=JUN=79 
7213 TEST TST INSTRUCTION 
CLN 
TST RO 
BLOS TEST3 
BVS TEST3 
BM! TS214 
TESTS: 
MOV 46453,=-(R2) 
INC -(R2) 
HALT 
S TEST 214 
TS214: INC (R2) 
CMP #214, (R2) 
BNE TS215=-10 
MOV #170000,RO 
SCC 
CLN 
SWAB RO 
BLOS SWB1 
BVS SWB1 
BM] SwB2 
SWB1: 
MOV #454,-(R2) 
INC -(R2) 
HALT 
SWBe: SCC 
CLZ 
SWAB RO 
BVS SwB3 
BCS SWB3 
BM] SwB3 
BEQ TS215 
SwB3: 
MOV 4455,=-(R2) 
INC -(R2) 


UPDATE TEST NUMBER 
‘ante eh ERROR? 
BR TO ERROR HALT ON SEQ ERROR 
:RO=170000 
:CC=0111 


:CC=1000 RO=360 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 767 


MOVE TO MAILBOX # xxexwee 454 aaeanene 
;SET MSGTYP TO FATAL ERROR 
‘eeetond NOT SET CC°S CORRECTLY 


:CC=0100 RO=170000 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 754 


sMOVE TO MAILBOX # weenxene 455 xxnnnnn 
7SET MSGTYP TO FATAL ERROR 


AAAA 


AAAA 
foun 


“owe 


vuudu 


Wom al 


CJKDB=B DCF11=A4 CPU pte: 
CJKDBB.P11 10:52 


020760 


050920 
020222 


020260 


020262 


19=JUN=79 


005212 
022712 
001062 
0712700 
000277 
062700 
101402 


102401 
100004 


012742 
005242 
000000 


000215 
049000 
030000 


900456 


010000 


000457 


100000 


MACY71 30A(1052) 
1214 


19=JUN=79 
TEST SWAB INSTRUCTION 


J 10 
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SEQ 0126 


FERRARA REE REA KERREKE EEE R RE REEEERREREERERERREREREREA EEE EEEK EKER AEEEEEEE RE REEEEE 


THESE NEXT TWO TESTS VERIFY THE FUNCTIONING OF THE ADD AND 
HE C AND 


SADC INSTRUCTIONS. 
:V_ BITS IDENTICALLY. 


BOTH OF THESE INSTRUCTIONS HANDLE 1 
THE PROCEDURE IS TO PRESET THE CONDITION 


:CODES, EXECUTE THE INSTRUCTION WITH A PARTICULAR SET OF DATA, AND 
THEN CHECK THE RESULTS BY EXECUTING A SERIES OF CONDITIONAL 


CHES. 


THES PROCEDURE IS REPEATED SEVERAL TIMES WITH DIFFERENT 


: BRAN 
:DATA TO PRODUCE EVERY COMBINATION OF C AND v BITS. 


USTTITITITTIT TTI TTITITILITTT TTT LETT TET TTT T TTT TEEPE TTT TTT TTT TTT TTT TTT 


TEST ADD INSTRUCTION 


a; ma. it ee Seek meme ee ee 


TEST 
7S215: 


ADD1: 


ADD2: 


ADD3: 


ADD4: 


ADDS: 


215 
INC 


(Re) 
#215, (R2) 
TS216-10 
#40000,R0 
#30000 ,RO 
ADD? 


ADD1 
ADD2 


#456,-(R2) 
-(R2) 


#10000.RO 
ADD3 


#457 ,=-(R2) 
-(R2) 


#100000 ,RO 
ADD5 


sMOVE TO MAILBOX # 


UPDATE TEST NUMBER 

s SEQUENCE ERROR? 

BR TO ERROR HALT ON SEQ ERROR 
tte rss a 


:CC=0000 RO0=70000 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 
456 


REKKKKEK KReRKKKE 


7SET MSGTYP TO FATAL ERROR 
sADD DID NOT SET CC'S CORRECTLY 
:CC=0100 


:CC=1010 


. 
. 


sMOVE TO MAILBOX # 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
COND I 


40=100000 


TIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 
457 


RRKKKKE RERKEKKE 


:SET MSGTYP TO FATAL ERROR 
oe oie NOT SET CC°S CORRECTLY 


:C€C=0111 


RO=0 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL GRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 742 


A AAA 
yma 


wow ui 


AAAA 
iow 
fom at 
“wou wt 


woo at 
toot it 


House ut 
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CJKDBB.P11 19=JUN=79 10:52 TEST ADD INSTRUCTION SEQ 0127 


020262 012742 000460 #460,-(R2) sMOVE TO MAILBOX # seeanee 460 weeenne 
020266 2 -(R2) ;SET MSGTYP TO FATAL ERROR 
sADD_DID NOT SET CC'S CORRECTLY 
177777 : pth al :C€C=1000 = RO=177777 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 731 


000461 : #461,-(R2) sMOVE TO MAILBOX # *eeeaee 46] seneene 
=(R2) ;SET MSGTYP TO FATAL ERROR 
ADD DID NOT SET CC'S CORRECTLY 


000001 DD ~—s #1, RO :€C=0101 R=0 


AAAA 
ee 
iueu 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSIRUCTION 
WHICH FOLLOWS W/ 715 


000462 #462 ,-(R2) :MOVE TO MAILBOX #4 *xxeKxe 462 xeaxnnn 
-(R2) ;SET MSGTYP TO FATAL ERROR 
ADD DID NOT SET CC'S CORRECTLY 
: OR SEQUENCE ERROR 


SII RK KEKE ERK RK KR KEE KERR EEE RE KK ERE EEE EEE EEE EERE EEE 
STEST 216 TEST ADC INSTRUCTION 
Calta tae meee eee eee meme ee 
TS216: INC (R2) ;UPDATE TEST NUMBER 
000216 #216, (R2) * SEQUENCE ERROR? 
TS217-10 [BR TO ERROR HALT ON SEQ ERROR 
077777 eorr77 RO 
:C€C=0101 


SCC 
+CLN!CLV 
ADC RO 3C€C=1010 
BLOS ADC1 
BVC ADC1 
020372 100404 BM ADC2 


AAAA 


iru u 
nou 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


000463 : #463,-(R2) sMOVE TO MAILBOX # «exeeee 663 xexnnee 
-(R2) 7SET MSGTYP TO FATAL ERROR 
sADC DID NOT SET CC*S CORRECTLY 


7CC=1011 


020374 


H, 
077777 : Bl #77777 RO 


000244 
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CJKDB=B DCF11=AA CPU_DIAG. MACY11 2 a 19=JUN=79 11:08 PAGE 128 


CJKDBB.P11 19=JUN=79 10:52 TEST ADC INSTRUCTION SEQ 0128 
6391 020414 005500 ADC RC ;CC=0101 RO=0 
6392 020416 101002 BHI ADC3 
6393 920620 1062401 BVS ADL3 
6394 020422 100004 BPL ADC4 
6395 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
6396 é CONDITIONAL BRANCH INST. AND <==== 
6397 3 REPLACE THE MOVE iNSTRUCTION <==== 
6398 ‘ WHICH FOLLOWS W/ 753 <=s== 
6399 020424 ADC3: 
6400 020424 012742 000464 MOV #464 ,-(R2) sMOVE TO MAILBOX # *xeeee 464 xaannne 
6401 020430 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
6402 020432 000000 HALT ;ADC DID NOT SET CC'S CORRECTLY 
6403 020434 000277 ADC4: * SCC 
04 020436 000245 +CLZ!CLC :CC=1010 
6405 020440 005500 ADC RO ;CC=0100 
6406 920442 102403 BVS ADCS 
6407 020444 103402 BCS ADC5 
6408 020446 100401 BM! ADCS 
6409 020450 001404 BEQ TS217 
6410 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
6411 ; CONDITIONAL BRANCH INSi. AND q€xz22 
6412 ‘ REPLACE THE MOVE INSTRUCTION <==== 
6413 ; WHICH FOLLOWS W/ 740 ¢€z=== 
6414 020452 ADC5: 
6415 020452 012742 000465 MOV #465,-(R2) sMOVE TO MAILBOX # *x%eeKe 465 teekeee 
6416 020456 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
6417 020460 000000 HALT ;ADC DID NOT SET CC°S CORRECTLY 
6418 ; OR SEQUENCE ERROR 
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020512 


020514 


020544 


020546 


020572 


005242 
000000 
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000217 
000001 


000466 


077777 


000467 
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SERRE EERE RKEKERERKEEEEREREREEE EEE EEKEEREREREEEEE EEE 


3 THESE NEXT THREE TESTS VERIFY THE FUNCTIONING OF THE NEG, 

CMP, AND COM INSTRUCTIONS. EACH OF THESE INSTRUCTIONS GENERATE 
THE C AND V BITS iDENTICALLY. THE CONDITION CODES ARE PRESET, 
STHE INSTRUCTIONS EXECUTED, AND THE RESULTS CHECKED WITH A SERIES 
SOF CONDITIONAL BRANCH INSTRUCTIONS. THIS PROCEDURE IS REPEATED 
SEVERAL TIMES WITH DIFFERENT Tt IN ORDER TO GENERATE DIFFERENT 
; COMBINATIONS OF THE C AND V BITS 


. 
FARRER REAR KR REE RRR K 


sTEST 217 TEST NEG INSTRUCTION 
MEPS Nag ages tea mace nee + ame yooh aki ell a a 
TS217: INC (R2) ;UPDATE TEST NUMBER 
CMP #217, (R2) SEQUENCE ERROR? 
BNE TS220-10 ;BR TO ERROR HALT ON SEQ ERROR 
MOV #1,R0 
Scc ;CC=0110 
+CLN!CLC 
G RO :CC=1001 RO=177777 
BCC NEG1 
BVS NEG1 
BEQ NEG1 
BMI NEG2 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
; CONDITIONAL BRANCH INST. AND <==== 
é REPLACE THE MOVE INSTRUCTION <==== 
NEGI 3 WHICH FOLLOWS W/ 766 ¢€==2= 
MOV #466,-(R2) sMOVE TO MAILBOX # *xxeee 466 teexnnn 
INC -(R2) ;SET MSGTYP TO FATAL ERROR 
HALT “NEG DID NOT SET CC'S CORRECTLY 
NEG2: BIC #77777 ,RO 
CCC :CC=0100 
SEZ 
NEG RO 7CC=1011 RO=100600 
BVC NEG3 
BCC NEG3 
BEQ NEG3 
BMI NEG4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
; CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
NEG3 i WHICH FOLLOWS W/ 751 <=s== 
MOV #467 ,-(R2) sMOVE TO MAILBOX # *xxxxxe 467 kexnnee 
INC -(R2) :SET MSGTYP TO FATAL ERROR 
HALT sNEG DID NOT SET CC'S CORRECTLY 
NEG4: CLR RO 
SCC :CC=1011 
CLZ 
NEG RO :CC=0100 RO=0 
BVS NEGS 
BCS NEGS 
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020574 100004 BPL TS$220 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 735 
020576 NEGS: 


020576 012742 MOV #470,=(R2) sMOVE TO MAILBOX # seewnee 470 seeneee 
020602 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
020604 000000 HALT NEG DID NOT SET CC'S CORRECTLY 

; OR SEQUENCE ERROR 


FERRARA AAA ERA ER RAE KERR EAREREERERERAEAEEAEAAEAREREEEERERAEEREEREEE REESE 


STEST 220 TEST CMP INSTRUCTION 


Reet tis ret iit i ric ti iii ii iri tii iit iti tit titi titi titi ttt titi itt titi ty 
TS220: INC (R2) ;UPDATE TEST NUMBER 
C #220, (R2) ; SEQUENCE ERROR? 
- 7BR TO ERROR HALT ON SEQ ERROR 


:C€C=1010 
:CC=0101 


NAAA 
irunuu 
“vunue 
fou tu 
hun 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


AAAA 


nuue 


090471 : #471,-(R2) :MOVE TO MAILBOX # *xaanae 471 teaneee 
-(R2) SET MSGTYP TO FATAL ERROR 
:CMP DID NOT SET CC'S CORRECTLY 


100000 : #100000 ,RO 
:CC=1101 


077777 MP RO,477777 :CC=0010 
CMP3 


CMP3 
CMP4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRIICTION 
WHICH FOLLOWS W/ 751 


000472 4#472,-(R2) sMOVE TO MAILBOX # xxxxxee 472 tienen 
-(R2) :SET MSGTYP TO FATAL ERROR 
:CMP_ DID NOT SET CC*S CORRECTLY 
040000 : #40000,RO :R0=140000 


040000 MP #40000,RO0 3C€C=1011 
CMP5 


AAAA 
niu uw 
nunu 
nun 


020724 
; TO SCCPE: CLEAR THE RIGHT BYTE OF THIS 
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CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 733 


012742 000473 : #473,=-(R2) sMOVE TC MAILBOX # *eeeene 473 eennnne 
-(R2) ;SET MSGTYP TO FATAL ERROR 
:CMP DID NOT SET CC'S CORRECTLY 


3CC=1111 


020726 


040000 : #40000,RO 


177777 #-1,RO =CC=0000 
CMP? 


CMP7 
020754 TS221 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 717 


012742 000474 ; #474 ,-(R2) ;MOVE TO MAILBOX # *aeeeee 474 seennen 
005242 =(R2) :SET MSGTYP TO FATAL ERROR 
000000 7 [CMP DID NOT SET CC'S CORRECTLY 

> OR SEQUENCE ERROR 


FARRER EERE RRR REE REE ERE ERR ERE RRR REE EERERREERRRE EERE REE 


STEST 221 TEST COM INSTRUCTION 


OOS IIDC IISIOIOIUIDIDIOIOIOIOIDIDIDIDIOIOIOIOIOIOIOIDIDIOIOISIDIDIOISIDIOISISIIDIOIUIDIOIIOIDIOIOIUIUIDINOIUIDIUIUOIOISIIOINIIIO ibe 
005212 TS221: INC ;UPDATE TEST NUMBER 
000227 e > SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 
177777 


;CC=1010 
7CC=0101 


AAAA 


iune 


020756 


021014 100004 BPL TS222 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 


012742 000475 MOV #475,-(R2) :MOVE TO MAILBOX # *teeeee 475 teeeene 
005242 INC -(R2) 7 SET “hel TO FATAL ERROR 
021024 000000 HALT :COM DID NOT SET CC*°S CORRECTLY 

; OR SEQUENCE ERROR 


021016 
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SERRATE AERA ERE REREERREEAAEREREERAEAAREREAAAAEAEREEAEEEEHEKERERE REE e 


; THESE NEXT TWO TESTS VERIFY THE FUNCTIONING OF THE SUB 

AND SBC INSTRUCTIONS. BOTH OF THESE INSTRUCTIONS HANDLE THE 

:C_ AND V BITS IDENTICALLY. THE PROCEDURE IS TO PRESET THE CONDITION 
:CODES, EXECUTE THE INSTRUCTION WITH A PARTICULAR SET OF aa - AND 
:THEN CHECK THE RESULTS BY EXECUTING A SERIES OF CONDITIONA 

ZBRANCHES. THIS PROCEDURE !S REPEATED SEVERAL TIMES WITH DIFFERENT 
:DATA PATTERNS TO PROVIDE EVERY COMBINATION OF THE C AND V BITS. 


PUTISIITITI TIT TIT TTL LLI LLL LELELE LITE LLTTTTLTTETE eT TT TTT TTTTTT TTT T ee 

STEST 222 TEST SUB INSTRUCTION 

FARA ERR ARERR RE TRAE EERE EEE THERE EERRERE RHEE REET 

021026 005212 15222: (R2) ;UPDATE TEST NUMBER 
000222 C #222, (R2) : SEQUENCE ERROR? 
TS225-10 ;BR TO ERROR HALT ON SEQ ERROR 
125252 #125252,R0 
:CC=1010 


& 
!SEC 
125252 #125252,R0 :CC=0101 =RO=0 
] SUB1 


SUB1 
SUB2 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


000476 #476,-(R2) sMOVE TO MAILBOX 4 *xeanee 476 saennne 
-(R2) 7SET MSGTYP TO FATAL ERROR 
;SUB DID NOT SET CC'S CORRECTLY 
100000 : #100000 ,RO 


:CC=1101 


077777 UB #77777 ,RO :€C=0010 = RO=1 
SUB3 
SUB3 
SUBS 


AAAA 
iouwu du 
iuud 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 751 


#477,-(R2) ;MOVE TO MAILBOX # sees 477 seennen 
-(R2) ;SET MSGTYP TO FATAL ERROR 


RO *RO=177777 
*CC=11111 


#100000 ,RO :€C=0000 RO=77777 
SUB5 


SUB5 

021136 SUB6 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 





D 11 
CJKDB-8 DCF11=AA CPU _DIAG. MACY11 30A(1052) 19=JUN=79 11:08 PAGE 133 
CJKDBB.P11 19=JUN=79 10:52 1222 TEST SUB INSTRUCTION SEQ 0133 


: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 736 


#500,=(R2) sMOVE TO MAILBOX # seeeeee 500 teneene 
-(R2) #SET MSGTYP TO FATAL ERROR 
;SUB DID NOT SET CC*S CORRECTLY 
:CC=0100 
140000 UB #140000,RO 3CC=1011 
SUB7 
SUB7 


SUB7 
T$223 


021140 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

3 CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 722 


012742 ; ' #501, -(R2) ZMOVE TO MAILBOX # xeeenee 50] sennnee 
005242 =(R2) ‘SET MSGTYP TO FATAL ERROR 


AAAA 
fuud 
iowunu 
inunu 


j Neeeeneaeanensanreanerenerraanaanaenenannanennanerinanenannnnsenenareneaenetersetees 
ZTEST 223 TEST SBC INSTRUCTION 
ag gine grt ec des age etre agony «png eta allt ft 
005212 75223: (Re) ;UPDATE TEST NUMBER 
C #223, (R2) SEQUENCE ERROR? 
;BR TO ERROR HALT ON SFC ERROR 


sCc=1011 
:CC=0100 R=0 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 766 


AAAA 
iouw a 


000502 ; #502,-(R2) :MOVE TO MAILBOX # xan 502 ennnnnn 
-(R2) :SET MSGTYP TO FATAL ERROR 
See BIS NOT SET CC*S CORRECTLY 


RO :€C=0100 R=0 
SBC3 
SBC3 


BM SBC3 
021256 001404 SBC4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 


AAAA 
“own u 


“wi u 
nou ou 
ioe oat ot 


021260 
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021260 012742 000503 MOV #503,-(R2) sMOVE TO MAILBOX # xteeewe 503 xaennne 
005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
Pret tt NOT SET CC°S CORRECTLY 


:€C=1001 = =RO=177777 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 740 


000504 #504,-(R2) sMOVE TO MAILBOX # *xeeeeee 504 xannnne 
-(R2) ;SET MSGTYP TO FATAL ERROR 
;SBC DID NOT SET CC'S CORRECTLY 
077777 $ #77777 ,RO ey ott pa 


RO :CC=0010 
SBC7 
SBC7 

021334 100004 TS224 


AAAA 
nnuu 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 724 


012742 000505 #505,-(R2) sMOVE TO MAILBOX # *keeeee 505 takeeee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

021344 000000 ;SBC DID NOT SET CC'S CORRECTLY 

; OR SEQUENCE ERROR 


A AAA 


021336 
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021346 
000224 


144000 


000506 


021424 100004 


021426 
er enes 000507 


021450 100004 
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FERRARA RARER REREERERERERREEEEEEREREREEEREREEEEEEEEEREREEREERARERRERRRE REESE 


: THESE NEXT FOUR TESTS VERIFY THE FUNCTIONING OF THE ROL, 
ROR, ASL_AND ASR INSTRUCTIONS. SPECIAL DATA PATTERNS ARE LOADED 
AND ROTATED SEVERAL TIMES FOR EACH TEST. THE CONDITION CODES 
SARE PRESET BEFORE EACH ROTATION AND THE CONDITION CODES ARE 
CHECKED AFTER EACH ROTATION. THE FINAL CHECK IN EACH TEST IS 
:TO_ VERIFY THE COMMULATIVE DATA RESULT. THE DATA PATTERNS HAVE 
_— SELECTED TO PRODUCE ALL COMBINATIONS OF THE C AND V BITS. 


TTTIITIIIIIIIITITTITTTITTTTITITITTT TTT TTT TTT TELE TELE LTTE TET TTT Tee 
STEST 224 TEST ROL INSTRUCTION 

2 Rae aca ~ agra cmg ee yen pre ati tel atlanta nila 
*$224: INC (R2) ;UPDATE TEST NUMBER 
CMP #224, (R2) Z SEQUENCE ERROR? 


BNE TS225-10 BR TO ERROR HALT ON SEQ ERROR 
MOV #144000,RO RO=144000 


ccc 
+SEZ!SEV 
ROL 0 


:C€C=0110 
:CC=1001 RO=110000 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 766 


#506,-(R2) sMOVE TO MAILBOX # xkaKKee 506 taKeRER 
-(R2) :SET MSGTYP TO FATAL ERROR 


*CC=1100 
:(C=0011 RO=020000 


AAAA 
ie u 
“nn u 
nun 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 


#507,-(R2) MOVE TO MAILBOX week SO7 reaxene 
-(R2) ;SET MSGTYP TO FATAL ERROR 
ROL DID NOT SET CC"S CORRECTLY 


:€C=0000 R0=040001 


: TO SCOPE: CLEAR THE RIGHI BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


AAA 
wou 
youu 
youu 
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021452 


021512 


021514 


021544 


021546 


021572 


021574 


012742 
005242 


001404 


012742 
005242 
000000 


005212 


100004 


000510 


100003 


000511 


000225 
000023 


000512 
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TEST ROL INSTRUCTION 
: WHICH FOLLOWS W/ 741 


MOV #510,=<R2) sMOVE TO MAILBOX # *eeneene 510 teennen 
INC -(R2) :SET MSGTYP TO FATAL ERROR 
HALT :ROL DID NOT SET CC'S CORRECTLY 

ROL6: CCC 7CC=0101 


+SEZ!SEC 
ROL RO :CC=1010 RO=100003 
ROL? 

ROL7 


ROL7 
#100003,R0 
TS225 


ROLS: 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 724 


#511,=(R2) ;MOVE TO MAILBOX # *xexeee 511 xeeenee 
-(R2) SET MSGTYP TO FATAL ERROR 
ROL_MALFUNCTIONED 
; OR SEQUENCE ERROR 


SEQ 0136 


FT IK KKK KER RRR KKK KKK KKK KKK KEKE REE KEE EKER EERE KEKE EH 


STEST 225 TEST ROR INSTRUCTION 


ma Me. wm ane Get ae ee 


TS225: (R2) UPDATE TEST NUMBER 
#225, (R2) SEQUENCE ERROR? 
2 + 58 ERROR HALT ON SEQ ERROR 


SCC=0111 
:CC=1001 RO=100011 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 


#512,-(R2) :MOVE TO MAILBOX # oy 512 xxeeKee 
-(R2) :SET MSGTYP TO FATAL ERR 

:ROR DID NOT SET CC'S CORRECTLY 

:CC=1100 


:CC=0011 RO=040004 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS wW/ 753 


“wuuwu 
“www 
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CJKDBB. 


021574 
021 


021620 


021622 


021654 


Spas, 


021720 


012742 
005242 


100404 


012742 
005242 
000000 
000277 


000513 


000514 


000515 


000226 
144000 


000516 


MACY11 30A(1052) 19=JUN=79 
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#513,-(R2) 
(R2) 


#514,=(R2) 
-(R2) 


$226 


#515,-(R2) 
-(R2) 


MOV 
INC 
HALT 


H 11 
11:08 PAGE 137 
TEST ROR INSTRUCTION 


sMOVE TO MAILBOX # xtanaeee 5135 aeveene 
SET MSGTYP TO FATAL ERROR 
:ROR DID NOT SET CC'S CORRECTLY 


:€C=0000 RO0=020002 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 740 


sMOVE TO MAILBOX # xeexaeee 574 
:SET MSGTYP TO FATAL ERROR 

ROR DID NOT SET CC°S CORRECTLY 
:CC=0101 


RREREKKE 


:€C=1010 RO=110001 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 726 


sMOVE TO MAILBOX # *eeeee 575 
;SET MSGTYP TO FATAL ERROR 

ROR DID NOT ; ok CORRECT RESULTS 
: OR SEQUENCE ERRO 


KeEKEREKE 


AAAA 
iuthu 


AAAA 
iow ut 


niu 
iwuu 


SEQ 0137 


aaah adnneseeiananleeiaenelinaidiiadlidicbnatimcentecomresuuaaedaiiidiaaeanaiandtinaiie iat 


STESY 226 


TEST ASL INSTRUCTION 


FO RE RK RRR ER EER EERE EERE ERE EKER ERE REE ER ERR EE 


1S226: (R2) 
#226, (R2) 
TS227-10 


#144000,R0 


#516,-(R2) 
-(R2) 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

;BR TO ERROR HALT ON SFQ ERROR 
RO=14000 

7CC=0110 


:C€C=1001 RO=110000 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 

sMOVE TO MAILBOX # *xeexeee 516 
:SET MSGTYP TO FATAL CRROR 


$CC=1100 


eeeaaee 


AAAA 


“iowuidl 
woot tt 
iouwouu 


woe ott 
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6892 021722 000243 *CLVICLC 
006300 ASL RO :€C=0011 RO=020000 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 753 


000517 "Mov ; :MOVE TO MAILBOX # seeeeee 517 seenene 
(R25 “SET MSGTYP TO FATAL ERROR 
ASL DID NOT SET CC'S CORRECTLY 


:CC=0000 R0=040000 


AAAA 
fouw ou 
nuudn 


021760 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 741 


000520 : #520,-(R2) sMOVE TO MAILBOX # *eeeeee 520 wenneee 
-(R2) :SET MSGTYP TO FATAL ERROR 
gat on NOT SET CC"S CORRECTLY 


:CC=1010 RO=100000 


AAAA 


021762 


ASL7 
1000C0 #100000,R0 
TS227 


022014 001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 723 

022016 


012742 000521 #527,=(R2) sMOVE TO MAILBOX # «eeewee 521 eueenne 
2 -(R2) 3SET MSGTYP TO FATAL ERROR 
022024 ZASL_MALFUNC TIONED 
; OR SEQUENCE ERROR 


AAAA 
iuunt 


mou u 
wuiuwu 
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SEERA AREER ER ERA REAR RERE EKER EERE ERE EEE ERE EERE EREEER EEE KEE 


TEST 227 TEST ASR INSTRUCTION 
LRAT REE REE E EE EERE EEE EERE REE ER ERE EEE 
022026 005212 7$227: (R2) ;UPDATE TEST NUMBER 
000227 #597, (R2) ; SEQUENCE ERROR? 
: TS230-10 BR TO ERROR HALT ON SEQ ERROR 
100023 #100023,R0 :A0=100523 


:CC=1001 = RP=140011 


100404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 


012742 000522 #522,-(R2) sMOVE TO MAILBOX # xxeeKKe 500) aannnnn 
-(R2) ;SET MSGTYP TO FATAL ERROR 
ASR DID NOT SET CC'S CORRECTLY 
100000 : #100000,R0 :R0=40011 


RO :CC=0011 RO=020004 
ASR3 
ASR3 
ASR3 
022110 ASR4 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 751 


000523 #523,-(R2) sMOVE TO MAILBOX # «ewxwwe 523 xennnne 
; -(R2) :SET MSGTYP TO FATAL ERROR 
000000 sASR DID NOT SET CC'S CORRECTLY 
022122 : :C(C=1111 


022124 006200 :C€C=0000 RO=010002 


AAAA 
“oni ut 
oie tt 
noi tt 
“uuu 


022112 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 737 


000524 #524,-(R2) sMOVE TO MAILBOX # *eeeeee 504) xanenen 
~(R2) :SET MSGTYP TO FATAL ERROR 
ASR ote NOT SET CC'S CORRECTLY 
100000 : #100000 ,RO :RO= | 10002 


0 CCC CC=0101 
022154 000265 +SE7:SEC 


AAAA 
woe a 
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022156 


022174 


022176 


022242 


022244 
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006200 
101406 
102005 
100004 
001403 


022700 
001404 


012742 
005242 
000000 


005242 
000000 


144001 


000525 


000230 


177777 


000526 


MACY11 30A(1052) 
1227 


ASR7: 


19=JUN=79 

TEST ASR INSTRUCTION 

ASR RO :C=1010 RO0=144001 

BLOS ASR7 

BvC ASR7 

BPL ASR7 

BEQ ASR7 

CMP #144001,R0 CHECK RESULT OF ASR‘S 

BEQ TS230 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 717 

MOV #525,-(R2) sMOVE TO MAILBOX # *keeKHe 505) Kae eK 

INC -(R2) :SET MSGTYP TO FATAL ERROR 

HALT ASR DID NOT FUNCTION CORRECTLY 


K 11 
11:08 PAGE 140 


; OR SEQUENCE ERROR 


SEQ 0140 


AAAA 


RR i TTT TOTTI III IOI IIIT III IIIT IOI tk 


; THIS TEST VERIFIES THE SXT INSTRUCTION. CONDITION CODES 
SARE PRESET IN EACH OF THE TWO POSSIBLE CASES. WITH THE N-BIT SET 
3 THE TEST CHECKS FOR ALL ONES IN THE DESTINATION. WITH THE N-BIT 
CLEAR, THE DESTINATION SHOULD CONTAIN ALL ZEROES. THE DATA 

:1S VERIFIED BY CONDITIONAL BRANCHES. 


° 
naa. “et be in hme 


230 


TEST THE SXT INSTRUCTION 


jAnstesaunansussteasensnancusnuenausentuanntuauncanuseecnenenecusnenncnennsasanentess 


TS230: 


SXTO: 


SXT1: 


C 
+SEZ!SEV 


(R2) UPDATE TEST NUMBER 

#230, (R2) SEQUENCE ERROR? 

TS231-10 :;BR TO ERROR HALT ON SEQ ERROR 
SET CC=1011 

RO TRY SXT 

SXTO TEST CC=1001 

SXTO 

SXxTO 

SxTO 

a CHECK DATA RESULT 

X 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 764 


sMOVE TO MAILBOX # xxexxx® Ka K REE 
3SET MSGTYP TO FATAL ERROR 


RESULTS OF SXT INCORRECT 


#526,-(R2) 526 
-(R2) 


RO 7RO=0 

(RO) :LOC. O0=0 

(RQ) sL0C. 0=177777 
sSET CC=0110 
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sTEST CC=0100 


022300 
022302 001404 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 744 


012742 000527 #527,=(R2) sMOVE TO MAILBOX # xeeeeee 527 aeannen 
2 -(R2) ;SET MSGTYP TO FATAL ERROR 
022312 RESULTS OF SXT INCORRECT 


AAAA 
nuuwnw 
iuun 


OR SEQUENCE ERROR 
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022314 


022414 


022416 


022424 


19=JUN=79 10:52 


1004 
022700 
001404 


012742 


012742 
005242 
000000 


000231 


007463 
031525 


036146 


000530 


007463 


000531 


MACY11 30A(1052) 
1230 


19=JUN=79 


M 11 
11:08 PAGE 142 
TEST THE SXT INSTRUCTION 


SEQ 0142 


FERRER ERE EERE REE EREEE EERE RE REEEEREEEEEKEEEER EERE RRR E EE 


THIS TEST VERIFIES THE XOR INSTRUCTION. UNIQUE PATTERNS 
:OF ONES AND ZEROES ARE MOVED TO DATA cs ag RO AND R1. 
AFTER THE FIRST XOR INSTRUCTION RO=36146. AN XOR IS THEN 


EXECUTED WITH THIS NEW VALUE 


AND THE CONTENTS OF R1 TO 


; REPRODUCE THE ORIGINAL VALUE IF RO=31525. 


ISTIIIIITITITITITITI TILT I TTT TI TILT TT LITT TTT TTT TEL TLE T TTT 


STEST 231 


TS231: 


XOR1: 


XOR2: 


XOR3: 


TEST THE XOR INSTRUCTION 


a. ae aan. ee Me ono CT 


(R2) 
#231, (R2) 

TS232-10 
nes RO 
#31525,R1 


XOR1 
#36146,RO0 
XOR2 


#530,-(R2) 
-(R2) 


R1 RS 


#531,-(R2) 
-(R2) 


UPDATE TEST NUMBER 


SEQUENCE ERROR? 


3;BR_TO ERROR HALT ON SEQ ERROR 
SET UP 7 


SET UP R 
sSET CC=1110 


TRY XOR 
:CC=0000? 


DATA RESULT CORRECT? 


TO SCOPE: CLEAR THE RIGHT BYTE - THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 761 


A AAA 
uuu 


zMOVE TO MAILBOX # *x*eeeeR 530 kekeeKe 
:SET MSGTYP TO FATAL ERROR 


:CC=1110 


TRY XOR MODE 0,0 
C=0000? 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <= 
CONDITIONAL BRANCH INST. AND <= 
REPLACE THE MOVE INSTRUCTION <s=== 
WHICH FOLLOWS W/ 742 <s=== 


MOVE TO MAILBOX # xxexaxe 53] waweane 
:SET MSGTYP TO FATAL ERROR 
SRESULT OF XOR INCORRECT 

OR SEQUENCE ERROR 


N 11 
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tat ei A alla aaa iil aia te ian 


THIS TEST VERIFIES THE SOB INSTRUCTION. R4 IS USED AS A 
= COUNTER WHILE RO IS THE ADDRESS REGISTER. CONDITIONAL 
BRANCHES ARE USED TO VERIFY PROPER TRANSFER OF CONTROL 
:WHILE R4 IS CHECKED TO INSURE PROPER DECREMENTING OF RO. 


WITITITISIIIIITIIIIITITITITII TILT T TTT LITT TLL LTTE 
STEST 232 TEST SOB INSTRUCTION 
FARA RERA AR REREEERA EERE EERE EREAEEEEEEEKEEERERAEERRERERR EKER EEE 
¥S232: (R2) :UPDATE TEST NUMBER 
C #232 (R2) s SEQUENCE ERROR? 
235-10 [BR TO ERROR HALT ON SEQ ERROR 


022452 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE PEAR TION 
WHICH FOLLOWS W/ 770 


022454 


sMOVE TO MAILBOX # «eeeeee 532 aeeenee 
;SET MSGTYP TO FATAL ERROR 


‘COUNT ITERATIONS 
=1111 


3CC= 
;DO SOB W/ RO 
sCHECK CC=1111 


: ITERATION COUNT OK? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 754 


012742 000533 #533,-(R2) sMOVE TO MAILBOX # xkeeeee 533 teeeeee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
022512 900000 : INCORRECT # OF BRANCHES OR CC'S CHANGED 
; OR SEQUENCE ERROR 


AAAA 
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022514 


001404 


012742 


001404 


000233 
001000 


0005 34 


125252 
001000 


000535 
052525 
006400 


022640 
022652 


0005 36 


001000 
052525 


MACY11 30A(1052) 
1232 
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TEST SOB INSTRUCTION 


B i2 
11:08 PAGE 144 


SEQ 0144 


en eee 


THIS TEST VERIFIES THE MARK INSTRUCTION. sHE EFFECTS 
“OF THE MARK INSTRUCTION ARE SIMULATED BY THE PROGRAM INSTRUCTIONS. 
; THE CONTENTS OF R5 AND THE STACK POINTER ARE CHECKED AFTER EACH 


:OF THE TWO ROUTINES IN THE TEST. 


ITITITITIIITITITTITITT LITT LI TILT LTTE TELE TTT T LETTE TET 


TEST MARK INSTRUCTION 


erties Mee So GAS rc. win eee SASF GAM Te otek ee ce ene 


sTEST 233 
1$233: 


(R2) 
#233, (R2) 
TS8234-10 
#STBOT, SP 
#125252, (SP) 
#74 ,SP 


A#MRK1 RS 
#6436,-(SP) 


MRK2 
R5 4125252 
MRK2 


#STBOT ,R6 
MRK 3 


#535,-(R2) 
-(R2) 


#52525,-(SP) 
#6400,-(SP) 
SP,R5 

PC ,d4MRK4 
@AMRKS 


R5 

#536,-(R2) 

-(R2) 

4 hy ga R6 
MRK6 


#52525,R5 
TS234 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
:;BR TO ERROR HALT ON SEQ ERROR 


;PUT R5 VALUE ON STACK 

EFFECTIVELY PUT 36 ARGUMENTS ON STACK 
7SET NEW PC _IN R5 

;PUT MARK 36 INST. ON STACK 
SET CC= Cest 111 

;XFER CONTL TO MARK 36 INST. ON STACK 
[MOVE TO MAILBOX # xeexeee 534 xexeens 
pat) Ban) TO FATAL ERROR 

K INST. SHOULD HAVE JUMPED TO MRK1 

Test CC _ UNAFFECTED 

IE. CC=1111 


CHECK RS RESTORED FROM STACK 


CHECK STACK POINTER READJUSTED CORRECTLY. 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
‘ REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 746 


sMOVE TO MAILBOX # *xaeeee = 535 
:SET MSGTYP TO FATAL ERROR 
sRESULTS OF MARK INCORRECT 


3PUT MARK 0 INST. ON STACK 
SET ADDR. OF MARK INST. IN R5 
:D0 JSR 
:DO RTS WITH R5 TO MARK INST ON STACK 
MOVE TO MAILBOX # *x*xexee 5 kktthee 
2 SET MSGTYP TO FATAL ERROR 


S,MARK SEQUENCE FAILED 
“STACK a CORRECTLY 


:1F NOT 
SCHECK IF RS RESTORED FROM STACK 


; TO SCOPE: foo THE RIGHT BYTE OF THIS 
: ONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
r WHICH FOLLOWS W/ 716 


RREKRER 


AAAA 
nun 


“owed 
“oui 
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7218 022666 012742 000537 MOV #537,=-(R2) SMOVE TO MAILBOX # ‘*«eawne 537 newenee 
242 ) ;SET MSGTYP TO FATAL ERROR 


7219 022672 005 INC -(R2 
recy 022674 000000 HAL T RESULTS OF MARK INCORRECT 


OR SEQUENCE ERROR 





CJKDB=B DCF 11=AA CPU_DIAG. 
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CJKDBB.P11 


022676 


022724 


022726 


022754 


022756 


023004 
023010 


177776 


005212 


001404 


012742 


001004 


012742 
005242 
000000 


000234 
000377 


000357 


000540 


000541 


000235 


177777 
177776 


D 12 
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155052 


TEST MARK INSTRUCTION SEQ 0146 
PS=177776 


DRT ETE REE REE EERE ERE E EERE RAR EEE ERE ERE ERE 
: THESE NEXT SEVEN TESTS VERIFY THE MTPS INSTRUCTION IN ALL 
: MODES. THE PSW IS DEFINED BY AN EQUATE STATEMENT BEFORE THE 

FIRST MIPS TEST. IN EACH TEST A PATTERN OF ONES AND 

ZEROES IS SET IN A DATA REGISTER AND MOVED TO THE PSw. 

THE DATA IN THE PSW, AND THE DATA REGISTER ADDRESS, 

ARE CHECKED TO VERIFY PROPER EXECUTION OF THE INSTRUCTION. 


. 
FO I KEE REE EEE EE 


STEST 234 TEST MIPS INSTRUCTION 
FI RR RE KRRKERRRRERRRRREKRKEREEREEEREKEREEEEREREREEAERR EERE REE 
75234: (R2) ;UPDATE TEST NUMBER 

#234, (R2) SEQUENCE ERROR? 

T$235-10 ;BR TO ERROR HALT ON SEQ ERROR 

#377 ,R0 


RO 
#357 ,PS 
MTPS1 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
’ CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 767 
#540,-(R2) “MOVE TO MAILBOX # *kaeeee 540 teeeeee 
-(R2) :SET MSGTYP TO FATAL ERROR 
:MTPS FAILED 


iowewu 


:¢C=1111 
TRY MIPS MODE 1 
iCHECK PS 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 


V #541,-(R2) :MOVE TO MAILBOX # xexexee 541 xeeenne 
INC ~(R2) :SET MSGTYP TO FATAL ERROR 
HALT :MTPS FAILED 

> OR SEQUENCE ERROR 


DIK KKK KIRKE ERE KEE KEKE EKER EERE EEE EERE EERE EKER EEE 


TEST 235 TEST MTPS MODE 2 


FIT RR KKK KEKE RE KR RKREKEKEEEEEEREKEEEEREEREEEEEEE 


TS235: (R2) UPDATE TEST —— 
CMP #235, (R2) : SEQUENCE ERROR 
T$236-10 BR TO ERROR HALT ON SEQ ERROR 
RO :RO=0 
#-1, (RO) :LOC. O=-1 
@APS :PS=0 
(RO) + :TRY MIPS W/MODE 2 


AAAA 
Www 


nun 
vunuu 
out 


MTPS1A: 
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023012 
023020 


023022 


023110 


023112 


19=JUN= 
022737 
001404 


012742 
005242 
000000 
022700 
001404 


012742 
005242 
000000 


fs 


001404 


012742 


001404 


012742 
005242 
000000 


005212 
022712 


79 10:52 


000357 


000542 


000001 


000543 


000236 
000402 


052652 
177776 


000252 


000544 


000404 


000545 


000237 


MACY11 30A(1052) 
7235 


177776 


000000 


177776 


19=JUN=79 


TEST MIPS MODE 2 


CMP 


#357 ,QAPS 
MTPS2 


#542,-(R2) 
2) 


#1,R0 
TS$236 


#543,-(R2) 
-(R2) 


E 12 
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SEQ 0147 


CHECK DATA 
; TO SCOPE: yy THE RIGHT BYTE OF THIS 


ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 
“MOVE TO MAILBOX # **xxeee §=542 
:SET MSGTYP TO FATAL ERROR 


RKKKEKKE 


:DEST. DATA INCORRECT 
CHECK DEST. REGISTER. 


; TO SCOPE: ae THE RIGHT BYTE OF THIS 


“MOVE TO MAILBOX # 


ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 756 
nhkakee 543 xxnnnee 
;SET MSGTYP TO FATAL ERROR 
“DEST REGISTER NOT INCREMENTED BY 1 


OR SEQUENCE ERROR 


FR I Re HT TI TTI IIT KEKE REE EEE ERE 


STEST 236 


TEST MTPS MODE 3 


nM apie erie eran” eee gree aa it ia stra Rein acta ces 
sUPDATE TEST NUMBER 

;SEQUENCE ERROR? 

:BR —_ HALT ON SEQ ERROR 


;RO= 

;LOC. 402=0 

;LOC. 0=52652 
:PS=0 

zs TRY MTPS W/MODE 3 
;CHECK DEST. DATA 


TS236: 


(R2) 
#236, (R2) 
1S237-10 
#402,R0 
(RO) 
#52652, a#0 
@APS 


a(RO)+ 
#252, QAPS 
MTPS3 


#544,-(R2) 
-(R2) 


#404 ,RO 
TS237 


#545 ,-(R2) 
~(R2) 


. 
a 
7 


“MOVE 
:SET MSGTYP TO FATAL ERROR 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDIT 


IONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 762 

TO MAILBOX # sxeeKee 544 


AAAA 


REEKKEK 


:DEST. DATA INCORRECT 


ZCHECK MODE 3 REGISTER. 


. 
. 


‘MOVE TO MAILBO 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 
X # wkeeneee 545 


AAAA 


REREERE 


:SET MSGTYP TO FATAL ERROR 
sMODE 3 REGISTER INCORRECT 


OR SEQUENCE ERROR 


OR RRR REE EER EERE ERE REE REE RRR EERE REE RERER EKER ERE 


STEST 237 


TEST MTPS MODE 4 


a. mane, ake”) 66) 6 oe oan Te 


15237: 


INC 
CMP 


(Re) 
#237, (R2) 


UPDATE TEST NUMBER 


SEQUENCE ERROR? 
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023146 1022 TS240=10 :BR TO ERROR HALT ON SEQ ERROR 
000001 #1,R0 
125125 000000 - —eo :L0C, 0 = 125125 


177776 ar 
-(RQ) TRY MTPS W/MODE 4 
000105 177776 #105 ,a4PS [CHECK DEST. DATA 


001404 MTPS4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 

WHICH Bp swe: W/ 763 
012742 000546 #546,-(R2) sMOVE TO MAILBOX eanteee 546 eeeeene 
-(R2) ;SET MSGTYP TO FATAL ERROR 
:DEST. DATA INCORRECT 
;CHECK MODE 4 REGISTER 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 755 

023214 012742 000547 #547,-(R2) sMOCVE TO MAILBOX # xxeexee 547 eaennen 
023220 005242 -(R2) :SET MSGTYP TO FATAL ERROR 

023222 000000 :MODE 4 REGISTER NOT DECREMENTED BY 1 

; OR SEQUENCE ERROR 


IIRC IOI IOI AAI IIIIIAIA III IIIIIS IA IA IAA III IIISSA IAAI INANIASAAAN ASSAM 
STEST 240 TEST MiPS MODE 5 
SOAP Ng“ aaa ame tiie ie nee penne tata ene needa te 
023224 S240: (R2) sUPDATE TEST NUMBER 
000240 CMP #240, (R2) ; SEQUENCE ERROR? 
15241-10 :BR TO ERROR HALT ON SEQ ERROR 
000404 7RO=404 


4404 ,RO 0= 
177400 000000 #177400, a#0 LOC. 0=177400 
S SET ALL COND. CODES 
a- (RO) STRY MTPS W/MODE 5 
177776 @APS CHECK DEST. DATA. 


093986 001404 MTPSS 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 
023260 012742 000550 #550,-(R2) “MOVE TO MAILBOX # keeeeee 550 xennene 
3 005242 -(R2) 7SET MSGTYP TO FATAL ERROR 
000000 H [DESTINATION DATA INCORRECT 
022700 000402 : rest RO 7CHECK MODE 5 REGISTER 


023274 001404 B TS241 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 756 
023276 012742 000551 #551,-(R2) [MOVE TO MAILBOX # sxexxee 55] xxeenee 
023302 005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
023304 000000 ;MODE 5 REGISTER NOT DECREMENTED BY 2 
: OR SEQUENCE ERROR 


PEAR REAR REE EEE TERE REAR ERRAEEKE ERE EKER e eee 


: RO 
023212 001404 BE TS240 


fou i 
iunu 


AAAA 
“une 


AAAA 
ee 


Wout te 
Wow ou 
Wout 
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STEST 241 TEST MIPS MODE 6 

aa tof ims. ce wena WAG cameee Oe cee ere te ee 
005212 1$241: (R2) :UPDATE TEST NUMBER 
000241 #241, (R2) SEQUENCE ERROR? 

 1§242=10 [BR TO ERROR HALT ON SEQ ERROR 

052652 000000 #52652, a#0 *LOC. 0=52652 
000406 #406,RO *RO=406 
177776 APS =PS=0 
177372 ~406 (RO) ‘TRY MIPS W/MODE 6 
000252 177776 #252, QAP =CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 762 

012742 000552 #552,-(R2) sMOVE TO MAILBOX # *taxeee 552 sexenne 

-(R2) sSET MSGTYP TO FATAL ERROR 
H DEST. DATA INCORRECT 
000406 : #406,R0 ;CHECK MODE 6 REGISTER 


023364 B TS242 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 753 

023366 012742 000553 #553,-(R2) sMOVE TO MAILBOX # *xeeeee 555 tewenne 

023372 005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

023374 000000 :MODE 6 REGISTER MODIFIED 
; OR SEQUENCE ERROR 


Fe I TI IKKE ERE EERE REE REE EER EERE EERE 

STEST 242 TEST MIPS MODE 7 

nai ie a eee eee ea a ee 
023376 T5242: (R2) ;UPDATE TEST NUMBER 
023400 000242 #242, (R2) : SEQUENCE ERROR? 

T5243-10 *BR TO ERROR HALT ON SEQ ERROR 
052652 000000 #52652, a4#0 :LOC. O=52652 
0 #410,RO “RO=410 


001404 


AAAA 
iow 


AAAA 


aA4PS :PS=0 
a-2 (RO) :TRY MTPS W/MODE 7 
000108 177776 MP Ah te CHECK DEST. DATA 


001404 MIP 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS wW/ 762 
012742 000554 #554,-(R2) [MOVE TO MAILBOX # Gesaes” 554 waeeeee 
0 (R25 :SET MSGTYP TO FATAL ERROR 
H [DESTINATION DATA INCORRECT 
000410 . f #410,RO [CHECK MODE 7 REGISTER 


001404 7$243 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
Z CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 753 
012742 000555 #555,=-(R2) “MOVE TO MAILBOX # sxeenen 555 weennee 
023462 005242 -(R2) SET MSGTYP TO FATAL ERROR 


AAAA 
woud ut 


woot at 
Women it 


te) oe 
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7446 023464 000000 HALT sMODE 7 REGISTER MODIFIED 
7447 ; QR SEQUENCE ERROR 


7448 
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CJKDBB.P11 

7449 

7450 

7451 

7452 

7453 

7454 

7455 

7456 

7457 

7458 

7459 

7460 0234 
7461 023470 
7462 023474 
7463 023476 
7464 023504 
7465 023506 
7466 023512 
7467 

7468 

7469 

7470 

7471 023514 
7472 023520 
7473 ~=023522 
7474 

7475 023524 
7476 = 023526 
7477 023534 
7478 023540 
7479 =023542 
7480 023546 
7481 

7482 

7483 

7484 

7485 023550 
7486 023554 
7487 023556 
7488 

7489 

7490 

7491 

7492 

7493 023560 
7494 023562 
7495 023566 
7496 023570 
7497 023572 
7498 023574 
7499 023602 
7500 023604 
7501 023606 
7502 023610 
7503 023612 
7504 


005212 


001404 


012742 


001404 


012742 
005242 
000000 


005212 


0 
100404 


000243 
000377 
177757 


000556 


177777 
177776 


000000 


000557 


000244 


000377 
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177776 


000000 


177776 


T24e TEST MTPS MODE SEQ 0151 


FEAR REE ERE AERA REAR ERE ERRAERE ERR EREEeHERee ee 


3 THESE NEXT SEVEN TESTS VERIFY THE MFPS INSTRUCTION IN ALL 
sMODES. IN a te TEST, A PATTERN OF ONES AND ZEROES IS MOVED TO THE 
:PSwW, AND AN MFPS INSTRUCTION MOVES THE DATA TO A LOCATION SETUP 
:BY RO, EITHER DIRECTLY OR INDIRECTLY. en BRANCHES ARE 
- USED TO CHECK PROPER ADDRESSING AND DATA 


juonatevenenasansucascesateeseessasonenanengneenieneeeeeReGeIeeneneneneneereneneennes 


EST 243 TEST MFPS INSTRUCTION 
$F aeeqnsedendnndeneuianedeeeanathetsensaeeeenasreereenanesnsetenesineehaenssenenenees 
7S243: INC (R2) ;UPDATE TEST NUMBER 
CMP #243,(R2) > SEQUENCE ERROR? 
BNE TS244-10 ;BR TO ERROR HALT ON SEQ ERROR 
MOV #377 ,a4PS 
MFPS RO 
CMP #177757 ,R0 
BEQ MFPS1 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <= 
CONDITIONAL BRANCH INST. AND <= 
REPLACE THE MOVE INSTRUCTION <= 
WHICH FOLLOWS W/ 770 <= 


nuku 


MOV #556,-(R2) “MOVE TO MAILBOX # tkeenee 556 wennene 
INC -(R2) ;SET MSGTYP TO FATAL ERROR 
HALT :MFPS FAILED 


MFPS1: CLR RO 

MO\ 4-1 ,aA0 
@A4PS 

MFPS (RO) 
ar 

BEQ TS244 


; TO SCOPE: CLEAR THF RIGHT BYTE OF THIS <=== 
; CONDITIONAL BRANCH INST. AND <=== 
€s3=s 
¢€232 


3 REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 752 
MOV #557,-(R2) [MOVE TO MAILBOX # xexxxee 557 sueneee 
INC -(R2) :SET MSGTYP TO FATAL ERROR 
HALT ZMFPS FAILED 
; OR SEQUENCE ERROR 
FRA RRR RRR ERE EERE EEE KEE EKER ERE REREERE TREE REE EERE Eee Ee 
TTEST 244 TEST MFPS MODE 2 
initie me. ase eee teat ae Oe 
75244: INC [UPDATE TEST NUMBER 
CMP ake (R2) S SEQUENCE ERROR? 
BNE 1$245=1 [BR TO ERROR HALT ON SEQ ERROR 
CLR RO ;RO= 0 
CLR (RO) LOC. 0=0 
MOV #377 ,aAPS ST PS=357 
MFPS (RO) + TTRY MFPS W/MODE 2 
BCC MFPS2A 7BR TO ERROR IF C BIT CLEAR 
BVS MFPS2A 7BR TO ERROR IF V BIT SET 
BEO MFPSOA :BR TO ERROR IF 2 BIT SET 


BM] MFPS2B 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
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7505 


0 
023650 


023652 


023720 
023722 
023740 


023742 
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012742 
005242 


000000 
022737 
001404 


012742 
005242 


012742 
005242 
000000 


005212 


012742 
005242 
000C00 
022737 
001404 


012742 


000560 


000357 


000561 


000001 


000562 


000245 


000406 
000006 
000252 


000563 


125000 


000564 
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MFPS2A: 
MOV 
INC 


HAL T 
000006 MFPS2B: CMP 
BEQ 


MOV 
INC 


HALT 
MFPS2C: CMP 
BEQ 
4 
‘MOV 


INC 
HALT 


#560,=-(R2) 
-(R2) 

#357 ,a40 
MFPS2C 
#561,-(R2) 
-(R2) 
#1,RO0 


T8245 


#562 .-(R2) 
-(R2) 


152 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 765 


sMOVE TO MAILBOX # xxeunee 560 kannnne 
= SET MSGTYP TO FATAL ERROR 

;COND. CODES INCORRECT 

:CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
é CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 
“MOVE TO MAILBOX # xkaxeKme 56] xaannne 
;S&T MSGTYP TO FATAL ERROR 
DEST. DATA INCORRECT 
> CHECK MODE Z REGISTER 


: TO SCOPE: ee THE RIGHT BYTE OF THIS 
é ‘DITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 746 
“MOVE TO MAILBOX # wxxxxnne 562 xunexan 
;SET MSGTYP TO FATAL ERROR 
:MODE 2 REGISTER NOT INCREMENTED 1 
; OR SEQUENCE ERROR 


AAAA 
ee 


SEQ 0152 


FR RRR KR KK ERE REE EKER EERE EERE EERE REE EEK 


TEST 245 


TEST MFPS MODE 3 


BRR RRR ERR KERR REE EEE EEE EKER REE R EEE ERE RRR KEE EE 


TS245: INC 


177776 MOV 


MFPS3A: 


H 
000000 MFPS3B: a 


(R2) 
#245, (R2) 


#563,-(R2) 
-(R2) 


#125000 ,a40 
MFPS3C 


#564,-(R2) 


;UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
:BR a HALT ON SEQ ERROR 


: 2 

STRY MFPS WITH MODE 3 

7BR TO ERROR IF C-BIT SET 
:BR TO ERROR IF V-BIT SET 
:BR TO ERROR IF 2-BIT SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


MOVE TO MAILBOX # wxeexnee 563 xeenene 
:SET MSGTYP TO FATAL ERROR 

:CONDITION CODES INCORRECT 

:CHECK DEST. DATA 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS wW/ 753 

“MOVE TO MAILBOX # Seeeeee 564 eeenees 


NAAA 
i 


nunue 


._--= 
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023746 005242 INC =(R2) SET MSGTYP TO FATAL ERROR 
000000 HALT :DEST DATA INCORRECT 
020027 000410 - MFPS3C: CMP RO,4410 CHECK MODE 3 REGISTER. 


023756 001404 BEQ TS246 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 744 
023760 012742 000565 MOV #565 ,-(R2) :MOVE TO MAILBOX #  Salalelalalel 
023764 005242 INC -(R2) sSET MSGTYP TO FATAL ERRO 
023766 000000 HALT ;MODE 3 REGISTER NOT INCREMENTED BY 2 
: OR SEQUENCE ERROR 


BI I KK I IT TTT TK KER EKER EERE EEE EEE EEE EEE EEE 
STEST 246 TEST MFPS MODE 4 
Santee” fr geet lc) eee SOE eee oe eee 
023770 005212 75246: (R2) ;UPDATE TEST NUMBER 
000246 #246, (R2) SEQUENCE ERROR? 
TS247=10 ;BR TO ERROR HALT ON SEQ ERROR 
000002 #2,R0 ;RO=2 
000000 a0 :LOC. O=0 
000125 177776 MOV #125 ,a4PS :PS=125 
~(RO) ;TRY MFPS W/MODE 4 
MFPS4A ;BR TO ERROR IF C-BIT CLEAR 
MFPS4A ;BR TO ERROR IF V-BIT SET 
MFPS4A ;BR TO ERROR IF 2-BIT SET 


024026 100004 MFPS4B 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


AAAA 
ome tt 


: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 


AAAA 
“oud 


024030 MFPS4A: 
012742 000566 MO #566 ,-(R2) sMOVE TO MAILBOX # *kxKeKe 566 tee RE 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 HA :COND. CODES INCORRECT 

022737 042400 000000 MFPS4B: £ 7 9 Fiat ZCHECK DEST. DATA 


001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 

c : WHICH FOLLOWS W/ 753 

012742 #567,-(R2) SMOVE TO MAILBOX # texnnex 567 sxenene 

005242 ~(R2) :SET MSGTYP TO FATAL ERROR 

000000 H SDEST. DATA INCORRECT 

920027 MFPS4C: CMP RO, #1 7CHECK MODE 4 REGISTER 


1404 B T5247 

; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
; WHICH {FOLLOWS W/ 744 

012742 000570 #570,-(R2) sMOVE TO MAILBOX # *xxexex 570 sennene 

005242 -(R25 ‘SET MSGTYP TO FATAL ERROR 

024074 000000 :MODE 4 REGISTER NOT DECREMENTED BY 1 

: OR SEQUENCE ERROR 


2 REE REE ARRREERERKEEREREAER EAR RAA RR R ERE 


AAAA 
iouunu 
“ou 


wun 
nouuu 
oiueitou 
“wuunu 


AAAA 
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TEST 247 TEST MFPS MODE 5 
ORE ISIOISIIISIIIOIIISIOIOIIOIUIIIIIOIDIOIOIOIUIUIOIUIDIOIIOI III IOI III IIIT II III III IIIBIIOISISII II ISISIIDIDINI 
024076 5212 18247: (R2) sUPDATE TEST NUMBER 
000247 C #247 ,(R2) te oe ERROR? 
TS250-10 TO ERROR HALT ON SEQ ERROR 
000410 MO RO= 410 
177777 000000 — :LOC. 0=-1 


177776 “PS= 
:TRY MFPS W/MODE 5 
7BR TO ERROR IF C-BIT SET 
:BR TO ERROR IF V-BIT SET 
:BR TO ERROR IF N-BIT SET 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 763 
MFPSSA: 


012742 000571 M #571,-(R2) sMOVE TO MAILBOX # xeexeee 571 teeKnen 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 HA :COND. CODES INCORRECT 
022737 000377 000000 MFPSSB: #377 ,a#0 SCHECK DEST. DATA 
024154 001404 MFPS5C 


001404 MFPS5B 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; COND! TIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 753 
024156 012742 000572 #572,-(R2) sMOVE TO MAILBOX # xxKexee 572 xaneenn 


024162 005242 -(R2) :SET MSGTYP TO FATAL ERROR 
024164 000000 HA [DEST DATA INCORRECT 
024166 020027 000406 MFPSSC: £ weseaee CHECK MODE 5 REGISTER 


024172 001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 744 

024174 012742 000573 #573,-(R2) sMOVE TO MAILBOX # xxeeeee 5735 weennne 

024200 005242 -(R2) :SET MSGTYP TO FATAL ERROR 

024202 000000 ;MODE 5 REGISTER NOT DECREMENTED BY 2 
: OR SEQUENCE ERROR 


KR KKK KK EERE KEE KEKE EERE EERE EKER EERE EERE EEE 
TEST 250 TEST MFPS MODE 6 
FI IIT TI IEEE KER EERE ERE EEE KER ERR EERE RARER ER EERE EERE 
005212 7S250: (R2) :UPDATE TEST NUMBER 
000250 #250, (R2) ;SEQUENCE ERROR? 
S2 BR TO ERROR HALT ON SEQ ERROR 
900401 :RO=410 


fou u 


177776 P iPS=252 
177377 TRY MFPS W/MODE 6 
7BR TO ERROR IF V-BIT SET 
BR TO ERROR IF C-BIT SET 
BR TO ERROR IF Z-BIT SET 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


024244 
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024246 


024302 


024304 
024310 
024312 


024314 


024354 
024356 
024366 
024374 


024376 


012742 
005242 
000000 
022700 
001404 


012742 
005242 
000000 


012742 
ppnens 


022737 
001404 


012742 


000574 


000252 


000575 


000401 


000576 


000251 
000777 
000000 


000125 
177407 


000577 


042400 


MACY11 30A(1052) 
7250 


MFPSEA: 
MO 


000000 


H 
MFPS6C: 
B 


19=JUN=79 
TEST MFPS MODE 6 


H. 
MF PS6B: 


#574 ,-(R2) 
-(R2) 
#252,a40 
MFPS6C 
#575 ,-(R2) 
-(R2) 
#401,R0 


TS251 


4576,-(R2) 
-(R2) 


M 12 
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CONDITIONAL BRANCH ISI. AND 
; REPLACE THE MOVE INSTRUCTION 
$ WHICH FOLLOWS W/ 762 


sMOVE TO MAILBOX #4 574 
;SET MSGTYP TO FATAL ERROR 
:COND. CODES INCORRECT 

CHECK DEST. DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

3 WHICH FOLLOWS W/ 752 

:MOVE TO MAILBOX # *kxxeKe 575 

:SET MSGTYP TO FATAL ERROR 

:DEST. DATA INCORRECT 

CHECK DEST. REGISTER 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
é WHICH FOLLOWS W/ 743 
sMOVE TO MAILBOX # x%xKxxe 576 
SET MSGTYP TO FATAL ERROR 
“DEST. DATA INCORRECT 
:; OR SEQUENCE ERROR 


REKKKKK 


KRKKKEKK 


REKKKKEK 


REKKKKEK 


AAAA 


AAAA 


SEQ 0155 


FI II IT I IK KK IKK KKK KIRKE KR KERR KEKE EEE EEK EEE ER ERE 


sTEST 251 


TEST MFPS MODE 7 


TEASE SISO ICUS DISS IO IOI ISISII DIO IIIT IIIS IIIS Sein nitins 


TS251: 


177776 


MFPS7A: 


H, 
000000 MFPS7B: S 


(R2) 
2214002) 


#123, 
a-371(RO) 
MFPS7A 
MFPS7A 
MFPS7A 
MFPS7B 


#577,-(R2) 
-(R2) 


at oof a#0 
MFPS7 


#600,-(R2) 


sUPDATE TEST NUMBER 
SEQUENCE ERROR? 
:BR we HALT ON SEQ ERROR 


:LOC, 0=0 


=125 
:TRY MFPS W/MODE 7 
BR TO ERROR IF V-BIT SET 
3BR TO ERROR IF C-BIT SET 
BR TO ERROR IF Z-BIT SET 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 762 


sMOVE TO MAILBOX # *exeee 577 
:SET MSGTYP TO FATAL ERROR 
CONDITION CODE INCORRECT 

CHECK DESTINATION DATA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 752 
“MOVE TO MAILBOX # 600 


REKKEKE 


RERKKKEK Reeakee 


iudiut 


“wun 
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024402 005242 =(R2) SET MSGTYP TO FATAL —— 
000000 H ZDEST. DATA INCORRECT 
022700 000777 MFPS7C: #777 ,RO :CHECK MODE 7 REGISTER 


024412 001404 BE 75252 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 743 
024414 012742 #601,-(R2) “MOVE TO MAILBOX # Skexeee 60] eeewnee 
024420 005242 = (R25 :SET MSGTYP TO FATAL ERROR 
024422 000000 [MODE 7 REGISTER MODIFIED 
t OR SEQUENCE ERROR 


ia ahaa ala aia aia a aia a i tah ana 


AAAA 
nun 


THIS TEST VERIFIES THAT RESET DOES NOT vy THE PSW. 
"THE PSwW IS LOADED WITH ONES, A RESET IS ISSUED, THE 
SCONTENTS OF THE PSW ARE CHECKED TO VERIFY THAT THEY HAVE NOT 

SCHANGED. THIS TEST IS EXECUTED ONLY ONCE EVERY 240 (DECIMAL) 
— OF PROGRAM. 


UTITISISITTITTITILITITTTTTITITITTTT LETT LETT TTT TTT TTT e TEE TTTTTTTTTTTT TTT E TTT 


STEST 252 TEST THAT RESET DOES NOT CLEAR PSW 
SRA REE E REE ER ERE EEE EEE EERE EERE EEE EERE EERE ERERE REAR EERE 
024424 S252: (R2) ‘UPDATE TEST NUMBER 
000252 C #252, (R2) ZSEQUENCE ERROR? 
7525 3-10 ‘BR TO ERROR HALT ON SEQ ERROR 
000357 177776 MOV #357,a4PS :MOV ONES TO PSW 


006357 177776 CMP #357, a4PS “Ps CORRECT? 


024452 001404 1$253 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 767 

024454 012742 #602,-(R2) [MOVE TO MAILBOX # *xeexxe 602 senneee 

024460 005242 -(R2) :SET MSGTYP TO FATAL ERROR 

024462 000000 SRESET ALTERED PSw 
+ OR SEQUENCE ERROR 

024464 REST: 


. aiken canara icinitiinie 


THE FOLLOWING TEST CHECKS THE INDEPENDENT FUNCTIONING OF BASIC 
DATA PATH COMPONENTS WITH USER MODE SET. 


ITTIIITILILITITILITILTTITITT LTTE TTT TTT TTT TTT TTT TTT RERREHAEKEKEKKKEEEK EE 


TEST 253 TEST USER MODE R6 CAN HOLD A ONE IN EVERY POSITION 
CREEK REE KR ERE REE REE ERE EKER EEE AREER EE EREREREERERKERERE REE EEE EER EE 
005212 75253: (R2) ;UPDATE TEST NUMBER 
000253 #253, (R2) SEQUENCE ERROR? 
TS254-10 :BR TO ERROR HALT ON SEQ ERROR 
140000 153274 #USRM,PS USER MODE 
000001 #1,R6 


AAAA 


“une 
iuuu 


0245 CL EAR C-BIT 
024510 006106 : R6 “ROTATE 1 POSITION 
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024512 103376 USP 1 ;BR IF NOT ALL DONE 
4 B USP1A ;BR_IF NO opt PICKED 
140000 153252 #MUSRM ,PS CLEAR USER MODE 
000603 #603,-(R2) ;MOVE TO MAILBOX # eeeweee 603 seeneee 
-(R2) :SET MSGTYP TO FATAL ERROR 
0 H [USER MODE R6 PICKED A BIT 
042767 140000 153234 USPIA: MUSRM ,PS ;CLEAR USER MODE 


FREER EERE EERE EERE ERK EEE RARER RRR EREEREE EERE ERE 


THIS TEST CHECKS THE INDEPENDENT FUNCTIONING OF THE USER 
“AND KERNEL MODE R6"S. R6 IS SETUP AND ADDRESSED IN EACH 
;OF THE TWO MODES TO VERIFY THAT THE TWO R6'S ARE INDEPENDENT 
:OF EACH OTHER, 


{SEAAAAAAAREAARAARROA EAE EEARERRRERERER ENTERS REAR ERR RNS ERA EER ETE RAE RANA EE REAR EEE 
TEST 254 TEST INDEPENDENCE OF USER AND KERNEL MODE R6'S 
aL mir <¢0 Meee oes eee Sead exam ce mec en ce eee 
024542 005212 75254: (R2) :UPDATE TEST NUMBER 
000254 #254, (R2) SEQUENCE ERROR? 5 
- HBR TO ERROR HALT ON SEQ ERROR 
140000 153216 ;SET USER MODE 
177777 6 SET USER R6 TO ALL ONES 
177777 :READ AND CHECK USER Ro 
BR IF NO ERROR 
140000 153176 J [CLEAR USER MODE 
000604 #604 ,-(R2) ;MOVE TO MAILBOX # seeenee 604 «eenene 
=(R2) SET MSGTYP TO FATAL ERROR 
H [USER R6 WILL NOT HOLD ALL ONES 
140000 153160 : #USRM,PS SET KERNEL MODE 
177777 ( #-1 ,R6 KERNEL MODE R6 ADDR. FROM USER MODE?>> 


024622 USP 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 752 
024624 000605 #605,-(R2) [MOVE TO MAILBOX # saaexee 605 senenes 
(R2) SET MSGTYP TO FATAL ERROR 
[DUAL ADDRESSING ERROR USER/KERNEL R6 
: =CLEAR KERNEL MODE S 
140000 153132 B :SET USER MODE 
177777 * CHECK oh R6 NOT ADDR. FROM KERNEL MODE 
140000 153120 ; R MODE 


USP4 ;BR IF 
000606 . :MOVE TO MAILBOX aananee 606 eeeenen 
(R2) ;SET MSGTYP TO FATAL ERROR 
[DUAL ADDRESSING ERROR OR SEQUENCE ERROR 
001000 : #STRBOT ,R6 RESTORE SP USER 
140000 153074 M#USRM,PS ;SET KERNEL MODE 
024702 001000 #STBOT ,R6 RESTORE SP KERNEL 


A AAA 
nouw iu 
ie 
niu 
“neuidnu 


esata aac cailatt heared iia ik shite cia techn 


THESE NEXT TWO TESTS VERIFY MFP] AND MIP] INSTRUCTIONS 
“WITH R6 IN MODE 0. 
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025012 


025012 


005212 
0 


001404 


000255 
001000 
140000 
027300 
140000 
140000 
000607 
140000 
001000 


000610 


000256 
152750 
140000 

0 


140000 
140000 
000611 


152674 
001000 


MACY11 


153046 


153032 
153022 


153004 
002276 


152740 


152720 
152710 


30A(1052) 19=JUN=79 
1254 
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TEST INDEPENDENCE OF USER AND KERNEL MODE R6'S 


PUSTIITISIIITITIITITITTTITITITITTTTTITITTTITITITTTTTTTTTTTTTTTTT TTT tii TTT tee 


STEST 255 


TEST MFPI WITH R6 IN MODE 0 


SEERA EREARAEAAEAEARERAAERAHERARERRAEREEKARARAEERERAAEREREHERE RARER RARERE AA EAS 


15255: (R2) 

#255, (R2) 
T$256-10 
#STBOT ,R6 
#USRM,PS 
#USTBOT ,R6 
R6 


#140000,PS 
MFPIO 
#USRM PS 
#607,-(R2) 
-(R2) 


H 
MFPIO: #U PS 
C asiB0r ~USTBOT=2 


H 
MFPIOA: 


;MOVE TO MAILBOX # 


;UPDATE TEST NUMBER 


SEQUENCE ERROR? 


TO ERROR HALT ON SEQ ERROR 

4g Yn KERNEL STACK POINTER 
T USER MODE .PREVIOUS KERNEL 

S INITIALIZE USER STACK POINTER 

TRY MFPI WITH MODE 0 

: CHECK PSW 
BR_ IF NO ERROR 

[CLEAR USER MODE 


KRRKRRKE eaeeneen 


607 


;SET MSGTYP TO FATAL ERROR 


; INCORRECT PSwW FROM MFPI 
: CLEAR USER MODE 
CHECK DATA ON STACK 
;BR IF NO ERROR 
sMOVE TO MAILBOX # 


RaRKRRKE aeeeenee 


610 


:SET MSGTYP TO FATAL ERROR 
; INCORRECT DATA FROM MFP] 


FRA E EERE EERE ERE EERE ERE REERA EERE EREEREREE REE eRe e 


STEST 256 


TEST MTPI WITH R6 IN MODE 0 


FRR AREA ERR RARE AERA AEEEEEH ERRATA ERERERE REE Ree eee ee 


15256: (R2) 
#256, (R2) 
1$257-10 


Re 

#USRM PS 
MUSTBOT ,R6 
#STBOT,-(R6) 
R6 

#USRM,PS 
MTPIO 

AMUSRM PS 
#611,-(R2) 
-(R2) 


PS 
R6 ,ASTROT 
TS257 


UPDATE TEST NUMBER 


SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


:MOVE TO MAILBO 


7SET KERNEL MODE 

: INITIALIZE KERNEL R6 

;SET USER MODE/PREVIOUS KERNEL 
; INITIALIZE USER STACK POINTER 
:SET UP TARGET DATA 

: TRY MODE O MIPI 

i CHECK PSW 

;BR IF NO ERROR 

;CLEAR USER MODE 


X # wae keae ktkeeee 


611 


;SET MSGTYP TO FATAL ERROR 
:PS INCORRECT FOLLOWING MTP] 


;SET KERNEL MODE 
i; CHECK TARGET DATA 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 744 


mow 
oso ot 
Houten 


AAAA 
noun 


SEQ 0158 


“MOVE TO MAILBOX # seeee8e 612 
;SET MSGTYP TO FATAL ERROR 

[DATA INCORRECT FOLLOWING MTP! 

; OR SEQUENCE ERROR 


025110 
025114 
025116 


012742 
005242 
000000 


000612 #612,-(R2) 
-(R2) 
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ee en eee 


: THIS TEST Asa eed EVERY POSSIBLE BRANCH WITH EVERY POSSIBLE 
CONDITION CODE COMBINATION. 
; THE ROUTINE USES TWO TABLES. THE BRANCH TABLE HOLDS ALL THE 
:POSSIBLE BRANCH INSTRUCTIONS, THE OTHER TABLE (YNTAB) HOLDS BIT MAPS FOR 
SEACH BRANCH. A ONE IN THE BIT MAP INDICATES THAT THE CORRESPONDING 
;BRANCH INSTRUCTION SHOULD BRANCH FOR THE CONDITION CODE SETTING WHICH 
; CORRESPONDS TO THE BIT POSITION WITHIN THE MAP. FOR EXAMPLE IF THE LEFT 
:MOST BIT IS A ONE THEN THE CORRESPONDING BRANCH INSTRUCTION SHOULD BRANCH 
; WHEN THE CONDITION CODES ARE 0. 

THE ROUTINE CONSISTS OF NESTED LOOPS; THE OUTER LOOP SETS UP 
ZALL_THE POSSIBLE BRANCH INSTRUCTIONS. THE INNER LOOP SETS UP EVERY POSSIBLE 
‘ppeche ~" CODE ts EACH BRANCH. 

E— BIT MAP IS USED TO SET THE ADDRESS LOCATION IN TwO 
+ JUMP MODE 3 INSTRUCTIONS. THE ADDRESSES ARE CHANGED TO ALLOW THE 
PROGRAR TO CONTINUE OR JUMP TO AN ERROR ROUTINE DEPENDING UPON 
WHETHER IT HANDLED THE BRANCH INSTRUCTION CORRECTLY. 

AT ANY ERROR HALT, LOCATION, BRH, HOLDS THE BRANCH INSTRUCTION 
“UNDER TEST AND LOCATION, CC, HOLDS THE VALUE OF THE CONDITION CODES 
sAT THE TIME THE BRANCH WAS EXECUTED. 


eee AeA RRR REREE REE REREREREREE REE EERE ERER EERE RRR REE EE ERE RRR EE EREEEREEeEe 


sTEST 257 TEST THE BRANCH ROM 
OT gem ae gp netomat pi oe Bete mie a 
025120 005212 1S257: INC (R2) ;UPDATE TEST NUMBER 
000257 CMP #257, (R2) > SEQUENCE ERROR? 
BNE ER ;BR TO ERROR HALT ON SEQ ERROR 
027170 SETUP: MOV #BRTAB,RO ; INITIALIZE BRANCH TABLE POINTER 
MO AYNTAB,RS ; INITIALIZE YES/NO BRANCH MAP POINTER 
MO #15. ,BRCT ; INITIALIZE BRANCH TABLE COUNT 
SETRR: (RQ) +,BRH GET NEXT BRANCH nw 
MO (R4)+,R1 ;GET NEXT BRANCH MAP 
#-1,CC1 s INITIALIZE CONDITION CODE VALUE 
MO #16. ,R3 s INITIALIZE CONDITION CODE COUNT 
SETCC: CC1 ;SET FOR NEXT CC VALUE 
BI #100000,R1 SEE IF SHOULD BR W/ THESE CC'S 
a@4177776,R5 sSIMULATE A JNE 
#177773,R5 ; (JUMP NOT EQUAL) 
. 5) ; TO SET2BR 


SET2BR 
000042 SET TO CONTINUE IF NO BRANCH 
000040 . :SET TO REPORT ERROR IF BRANCH 
J :GO AROUND OPPOSITE CONDITION 
000022 $ #ER,NBR :SET TO REPORT ERROR IF NO BRANCH 
025312 000020 . :SET TO CONTINUE IF BRANCH 
025252 2 R1 [UPDATE BIT MAP 


025254 012737 (PC)+,a(PC)+ SET CONDITION CODE 
000000 : NEW CC VALUE GOES HERE 
177776 
000000 


sBRANCH INST. GOES HERE 
000137 a(PC)+ THIS JUMP IF NO BRANCH 
0252 000000 : 0 WHERE TO GO IF NO BRANCH OCCURS 
025270 000137 a(PC)+ THIS JUMP IF BRANCH OCCURS 
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025272 


000304 
000613 


177776 


025354 000167 177566 


MACY11 30A(1052) 
1257 


YBR: 
ER: 


BRCT: 


19=JUN=79 
TEST THE BRANCH R 


A#$TESTN,R2 
#613,-(R2) 
-(R2) 


R3 
@4177776,R5 
priits oR 


BRCT 
@4177776,R5 
#177773,R5 
.+4(R5) 
SETBR 


E 13 
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sWHERE TO GO IF BRANCH OCCURS 
RESTORE POINTER 


sMOVE TO MAILBOX # «teen 673 


aeaeeene 


;SET MSGTYP TO FATAL ERROR 


° 
° 
Py 
. 


;CC*S DONE? 

;SIMULATE A JNE 
(JUMP NOT EQUAL ) 
TO SETCC 


;BR'S DONE? 

s SIMULATE A JNE 
(JUMP NOT EQUAL) 
TO SETBR 


SEQ 0160 
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0255 
025512 
025514 


025524 


005212 


001404 


012742 


012702 


000001 


000100 
000040 
000020 
000010 
000004 
000002 
000001 


000614 


000304 


F 13 
MACY71 30A(1052) 19=JUN=79 11: re " PAGE 161 
1257 TEST THE BRANCH R SEQ 0161 


SERRE REE REE REE ERR ERE EER EERE REREREEE EERE 


:THE FOLLOWING TEST VERIFIES THAT NO DUAL ADDRESSING OF THE GENERAL 
sREGISTERS OCCURS. ALL REGISTERS ARE CLEARED, AND A UNIQUE BIT IS SET 
:REGISTER. CMP INSTRUCTIONS CHECK THAT ONLY ONE BIT IS SET IN EACH 


ISTIITIITILITI TILT TTTTITITTT TTT TTT TTT TTT TTT TTT LTTE TET TTT TTT TTT TTT TTT TTT 


TTEST 260 DUAL REGISTER ADDRESSING TEST 
"Se tlm aa neh matt 
S260: (R2) ;UPDATE TEST NUMBER 
#260, (R2) > SEQUENCE ERROR? 
BN DAERR ;BR TO ERROR HALT ON SEQ ERROR 
BITCLR: : RO 7 INITIALIZE ALL REGISTERS 


CL 
BITSET: SET RO=1 
8 ;R1=2 


B ;R6=100 
BITCHK: ZTEST THAT NO DUAL ADDRESSING OCCURRED 
BN [BR TO ERROR HALT IF ANY OTHER BITS ARE SET 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS wW/ 725 


#614 ,-(R2) ;MOVE TO MAILBOX # weeceee 614 seneeee 
=(R25 SET MSGTYP To FATAL ERROR 
HALT [DUAL ADDRESSING EWROR 
BITCON: MOV —s #$TESTN,R2 RESTORE POINTER 


DAERR: 
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8020 IIIS IOIISIIIIIIIIDIOISIIUIISIIIOIUIIUIOUIIIIUIIIIIUUIIO EEE REE RES ERE ER ERE ER EER EEE 
8021 : THIS TEST VERIFIES THAT THE UPPER BYTE OF THE PSW IS NOT AFFECTED 
8022 ‘WHEN THE PRIORITY LEVEL OR CC'S ARE CHANGED. ALL BITS ARE 
8023 s INITIALLY SET IN THE PSW, AND THE LOW BYTE IS CLEARED. A BIT 
Boss : INSTRUCTION VERIFIES THE DATA. 
8026 TGA SIS IIIS ISIIIISIIUIIIIIOOIIIIEIIEEIDIOOIII III DEI EEE Renn tnnnnnes 
8027 STESI 261 TEST BYTE INSTRUCTION ON PSW 
R028 r+ ea gente eae ti ety goo re atch aac tnk: terse 

025530 005212 TS261: INC (R2) ;UPDATE TEST NUMBER 
8030 025532 022712 000261 CMP #261, (R2) ; SEQUENCE ERROR? 
8031 025536 001012 BNE BTERR “BR TO ERROR HALT ON SEQ ERROR 
8032 025540 052737 170357 177776 BIS #170357, a4PS ;SET ALL POSSIBLE BITS IN PSW 
8033 025546 105037 177776 CLRB @APS :CLR PR LEVEL AND CC'S 
8034 025552 013700 177776 MOV a@4PS ,RO ;COPY CONTENTS OF PSW 
8035 025556 032700 170000 BIT #170000,R0 ; TEST THAT UPPER BYTE IS UNAFFECTED 
8036 025562 001006 BNE BTCON > CONTI NUE IF OK 
8037 025564 005037 177776 BTERR: CLR @APS RETURN TO KERNEL MODE 
8038 025570 012742 000615 MOV #615,-(R2) sMOVE TO MAILBOX # kkKxKee 615 weeenne 
8039 025574 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
8040 025576 000000 HALT sBYTE INSTRUCTION ALTERED PSw 
oes 025600 005037 177776 BICON: CLR @APS sRETURN TO KERNEL MODE 
8043 FOO III IIR SIO IIIIOISISIIDIIIIOIOIUIUIUIOIDIDIIIOIOIOIDIOIOIOIOI III IIIT GIIIIISIOIISIIDIUIDIEIDIDE I Ion tot 
8044 : 
8045 THIS TEST VERIFIES THAT A JMP INSTRUCTION DOES NOT ALTER THE 
8046 > CONDITION CODES IN THE PSW. THE CC'S ARE PRESET,THE JMP IS 
Pek sEXECUTED, AND CONDITIONAL BRANCHES VERIFY THE STATE OF THE CC'S. 
8049 OUTTTTITITETITITITTTTLTTTTITTTLT LETT TTT TT TTT TTT T ETUC TTT T TTT T TTT TTT TTT TTT 
8050 sTEST 262 TEST THAT JMP INSTRUCTION DOES NOT AFFECT CONDITION CODES 
8051 OUI IUIIIIISIOIIOIOIIOIOIOIUIDINISIOIDIOIOIOIOIUIOIUISIIOIIIIOIUIOIDITIDISI GI DIIUIDIDIDIUIDIGI OI IDIDIUIOIISID II IOIUIOI III OI tok 
8052 025604 005212 TS262: INC (R2) ;UPDATE TEST NUMBER 
8053 025606 022712 000262 CMP #262, (R2) + SEQUENCE ERROR? 
8054 025612 001010 BNE TS263-10 ;BR TO ERROR HALT ON SEQ ERROR 
8055 025614 000277 SCC 
8056 025616 000252 +CLN!ICLV 7CC=0101 
8057 025620 000167 000000 JMP JMPT ; JUMP TO TEST PSw 
8058 025624 100403 JMPT : BM! JMPERR ;BR TO ERROR HALT IF N-BIT IS SET 
8059 025626 001002 BNE JMPERR :BR TO ERROR HALT IF Z-BiT IS CLEAR 
8060 025630 102401 BVS JMPERR ;BR TO ERROR HALT IF V-BIT IF SET 
8061 025632 103404 BCS TS263 & 
8062 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
8063 : CONDITIONAL BRANCH INST. AND <®=== 

; REPLACE THE MOVE INSTRUCTION <==== 

8065 5 WHICH FOLLOWS W/ 767 ¢€2s22 
8066 025634 JMPERR: 
8067 025634 012742 000616 MOV #616,-(R2) sMOVE TO MAILBOX # x*eeneme 616 eeennee 
8068 025640 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
8069 025642 000000 HALT 7JMP INSTRUCTION AFFECTED CC'S 


8070 : OR SEQUENCE ERROR 
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TN 


THIS TEST VERIFIES THE SET AND CLEAR CONDITION CODE INSTRUCTIONS. 
“THE TEST CONSISTS OF TWO ROUTINES, ONE TO TEST ALi CLEAR CC 
: INSTRUCTIONS AND THE SECOND TO TEST ALL SET CC INSTRUCTIONS. ALL 
a . COMBINATIONS OF CONDITION CODES ARE TESTED, INCLUDING NOP" S. 

O TEST THE CLEAR CC INSTRUCTIONS, ALL CONDITION CODES ARE 
INITIALLY SET. THE INSTRUCTION IS EXECUTED, AND THE PSW IS CHECKED 
:T0 i S THE PROPER COMBINATION OF CONDITION COD 

TEST THE SEF CC INSTRUCTIONS, THE CONDITION CODES ARE 
‘INITIALLY CLEARED, AND ONLY THE REQUIRED BITS ARE SET BY THE SET CC 
INSTRUCTION. THE CONTENTS OF THE PSW ARE CHECKED TO VERIFY THAT 
ZONLY THE REQUIRED BITS WERE SET. 


ESTITIIITITTTIITTTTTITTTITTT TTT TT TTT TTT TTT TTT TTT E PETE TTC TT ETT 
TEST 263 TEST SET CC AND CLEAR CC INSTRUCTIONS 
FO RHR EERE KERR KKK RRR 
005212 75263: (R2) ;UPDATE TEST NUMBER 
000263 C #263, (R2) SEQUENCE ERROR? 
CCERR BR TO ERROR HALT ON SEQ ERROR 
000240 000024 : INITIALIZE “ CC INSTRUCTION CODES 
000032 7,CC2 INITIALIZE OCTAL MAP 
000102 INITIALIZE SET CC INSTRUCTION CODES 
000001 000110 1,8C4 INITIALIZE OCTAL MAP 
:SET ALL CONDITION CODES 
: CONDITION CODE INSTRUCTION 
177776 @APS RS :COPY THE PSW 
177760 #177760,R4 ISOLATE CONDITION CODES 
(PC)+,R4 sCHECK THAT PROPER CC'S WERE » ics 
3 0 SOCTAL REPRESENTATION OF CC 
025724 001404 CON1 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 752 
025726 012742 000617 #617,-(R2) “MOVE TO MAILBOX # *exeKee 617 KeEKE ER 
-(R2) :SET MSGTYP TO FATAL ERROR 
:CLEAR CC INSTRUCTION FAILED 
177760 3 CC2 >SET NEXT OCTAL MAP OF CC'S 
177740 CC3 7GET NEXT CLEAR CC INSTRUCTION 
177734 000257 CC3,4257 :TEST FOR CCC INSTRUCTION 
CLRCD :GO_ TEST NEXT INSTRUCTION IF NOT FOUND 
177724 000260 CC3,4260 CHECK FOR NOP=260 
SETCD 7GO TEST SET CC_ INSTRUCTIONS 
000017 177726 #17,(C2 ‘a5. uti to TO TEST NOP 


CLRCD 
:CLEAR ALL CONDITION CODES 
: :CONDITION CODE INSTRUCTION 
177776 BAPS RG *COY PSW 
177760 #177760,R4 CLEAR AWAY UNWANTED BITS 
(PC) +,R4 CHECK THAT PROPER CC'S WERE SET 
000000 : 0 SOCTAL REPRESENTATION OF CC'S 
026016 001404 CON2 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 


ANAA 


00 Go 00 Cd Cd Oo GO Co Cd G0 Co Oc OO Co Co Oo 
ed ad dd od 1 J 3 
NONMON IN NNN @ @ @ eS SS Se 
ANEW OC ODNAUEWN— 


NAA 
“ou 
“iwi 
oun 
“ono 
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: WHICH FOLLOWS W/ 715 
026020 CCERR: 


012742 000620 #620,-(R2) sMOVE TO MAILBOX # *##eeee 620 seneene 
-(R2) :SET MSGTYP TO FATAL ERROR 
;SET CC FAILED OR SEQUENCE ERROR 
177760 CON2: ;SET NEXT CCTAL 


MAP 
177740 $C3 PREPARE NEXT SET CC INSTRUCTION 
177734 000277 


7F INI SHED? 


003753 E :BR IF NO 
026050 000167 000006 JUMP TO NEXT TESTS 
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CJKDBB.P11 19=JUN=79 10:52 T7263 TEST SET CC AND CLEAR CC INSTRUCTIONS SEQ 0165 
8137 DIEU ISI GIOIDIIOISIIISISIUIOIDIDISIDIDIISIDIIIDIIDIDIUIISIIIDIDIOIIOIIUIOIISIOIDIIDISIDIUINIDIDBII DUIS DIESE n ties 
abe »SBTTL TEST INSTRUCTIONS USING SAME REGISTER FOR SOURCE & DESTINATION 
8140 IN AUTO INCREMENT (DECREMENT) MODES AND 
8141 ;AUTO INCREMENT (DECREMENT) DEFERRED MODES, 

8142 ;CONTENTS OF THE REGISTER IN USED ARE 

8143 : INCREMENTED (DECREMENTED) BY 2 

Bice ;BEFORE USED AS THE SOURCE OPERAND. 

8146 026054 0900000 000000 000000 A: -WORD 0,0,0 

8147 026062 MORO: 

8148 FI I I I IIR ERIK RK EEE EERE EKER ERR 
8149 STEST 264 TEST AUTO=INCREMENT MODE, USING RO 

8150 TOGO IOI IOI IIIS CIO IIIS IOIIOIIDI TOI III IIIT IOI III IT IIIT III III III Un 
8151 026062 005212 7S264: INC (R2) sUPDATE TEST NUMBER 

8152 026064 022712 000264 CMP #264, (R2) + SEQUENCE ERROR? 

8153 026070 001020 BNE TS265-10 ;BR TO ERROR HALT ON SEQ ERROR 

8154 026072 005037 026054 CLR asvA ;CLEAR LOC A 

8155 026076 012700 026054 MOV #A,RO 7RO STORES ADDR OF A 

8156 026102 060020 ADD RO, (RO) + ;CHECK THAT RO IS INCR BY 2 BEFORE 

8157 ;BEING USED AS THE SOURCE OPERAND 

8158 026104 022700 026056 CMP #A+2,R0 ;RO INCR BY 2? 

8159 026110 001404 BEQ MOR1 

8160 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
8161 i CONDITIONAL BRANCH INST. AND <==== 
8162 : REPLACE THE MOVE INSTRUCTION <==== 
8163 WHICH FOLLOWS W/ 767 ¢2s22 
8164 026112 012742 000621 MOV #621,-(R2) *MOVE TO MAILBOX # *xkKKKe 62] KaeeKKn 

8165 026116 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

aioe 026120 000000 HALT :RO WAS NOT INCREMENTED BY 2 

8168 026122 022737 026056 026054 MORI: CMP H#A+2 , DAA + CHECK CONTENT OF RO WAS a. BY 2 BEFORE 

8169 ‘BE ING USED IN THE ‘‘ADD'’ INSTR 

8170 ;LOC A CONTAINS (A+2)? 

8171 026130 001404 BEQ TS265 

8172 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
8173 é CONDITIONAL BRANCH INST. AND <==== 
8174 s REPLACE THE MOVE INSTRUCTION <==== 
8175 ; WHICH FOLLOWS W/ 757 <s=== 
8176 026132 012742 000622 MOV #622,-(R2) sMOVE TO MAILBOX # keene 622 eannnne 

8177 026136 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

8178 026140 000000 HALT sWRONG SUM IN LOC A 

dha ; OR SEQUENCE ERROR 

8181 OORT TUTOR TORR RRR ERIE EER EEE EERE EE ERE ER ERE 
8182 TEST 265 AUTO=DECREMENT MODE, USING RO 

8183 ieseuesesecuubenseesensananansnenessesesenenconesonenintanatnererinGneeteneseenneneth 
8184 026142 005212 75265: INC (R2) ;UPDATE TEST NUMBER 

8185 026144 022712 000265 CMP #265, (R2) 7 SEQUENCE ERROR? 

8186 026150 001020 BNE TS266-10 ‘BR TO wr HALT ON SEQ ERROR 

8187 026152 005037 026054 CLR ava sCLEAR LOC A 

8188 026156 012700 026056 MOV #A+2,R0 *RO STORES ADDR OF A+2 

8189 026162 060040 ADD RO,-(RO) ;CHECK THAT RO IS DECR BY 2 BEFORE 

8190 [BE ING USED . > THE SOURCE OPERAND 


8191 026164 022700 026054 CMP #A,RO RO DECR BY 
8192 026170 001404 BEQ MOR2 
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; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
5 REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 767 
026172 012742 000625 #623,-(R2) sMOVE TO MAILBOX # *keeene 6235 aaennne 
005242 =(R2) 3SET MSGTYP TO FATAL ERROR 
000000 :RO WAS NOT DECREMENTED BY 2 


026202 022737 026054 026054 MOR2: MA, aHA [CONTENT OF RO WAS DECR BY 2 BEFORE 
;BEING USED IN a “‘ADD'' INSTR 
;LOC A CONTAINS (RO) 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 757 
026212 012742 MOV #624 ,-(R2) SMOVE TO MAILBOX # xxxeeee 624 taenee 
026216 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
026220 000000 HALT WRONG SUM IN LOC A 
; OR SEQUENCE ERROR 


GUUS IIDC IIIS ICIS IOIDIGIOIOIIIOIDIOIIOIOIIIUIOIIDIDIOI III OI ITSO Onn 
[TEST 266 TEST AUTO=INCREMENT DEFERRED MODE, USING RO 
So ge ene“ pilin oe tm ee telah aaa 
026222 005212 T5266: (R2) ;UPDATE TEST NUMBER 
000266 #266, (R2) : SEQUENCE ERROR? 
T$267-10 [BR TO ER ROR HALT ON SEQ ERROR 
026054 :CLEAR LOC A 
[CLEAR LOC A+4 
026056 , ‘STORE ADDR A IN, LOC A+2 
026056 *RO STORES ADDR A 
026254 060030 RO,a(RO) + SCHECK THAT RO 1s. INCR BY 2 BEFORE 
‘BEING USED AS THE SOURCE OPERAND 
026256 022700 026060 #Ar6 JRO ‘RO INCR BY 2? 


026262 001404 
:; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITI 


ONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 762 
026264 012742 000625 #625,-(R2) sMOVE TO MAILBOX # *xexRee 605 KeKRKE® 
026270 005242 -(R2) :SET MSGTYP TO FATAL ERROR 
026272 000000 :RO WAS NOT INCREMENTED BY 2 


026274 022737 026054 026056 MOR3: HA, QAA+2 [LOC A+2 STILL STORES ADDR A? 


026302 001404 B MOR4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

; WHICH FOLLOWS W/ 752 

026304 012742 000626 #626,-(R2) sMOVE TO MAILBOX # *eeeeee 626 senenen 

026310 005242 -(R2) :SET MSGTYP TO FATAL ERROR 

026312 000000 :LOC A+2 STORES WRONG DATA 


026314 022737 026060 026054 MOR4: HA+4 ,aAA [CHECK CONTENT OF RO WAS INCR BY 2 BEFORE 
BEING USED IN THE ‘'ADD** INSTR 
026322 001404 MOR5 


026210 001404 TS266 


AARA 
wun 


A AAA 
“eunu 


iouuu 
1eew i 
nuuu 


AAAA 
“uuu 


Wwounn u 
“wou u 
Wom 
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026324 
026330 
026332 


026334 
026340 


026342 
026346 
026350 


026352 


026444 
026452 


012742 
005242 
000000 


005737 
001404 


012742 
005242 
000000 


005212 


022700 
001404 


012742 
005242 
000000 
022737 


007404 


012742 
005242 
000000 


022737 
001404 


MACY11 30A(1052) 
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000627 


026060 


000630 
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#627 ,-(R2) 
-(R2) 


asA+4 
TS267 


#630,-(R2) 
-(R2) 
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; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 742 
:MOVE TO MAILBOX # *eeaeee = 627 
SET MSGTYP TO FATAL ERROR 

:LOC A STORES WRONG DATA 


[LOC A+4 STILL STORES 0? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 733 
sMOVE TO MAILBOX # *xxxxxe 630 
;SET MSGTYP TO FATAL ERROR 

;LOC_A+4 DID NOT STAY CLEAR 

: OR SEQUENCE ERROR 


RRERKEE 


REEEKKE 


AAAA 
nhuuwu 


AAAA 
nnunu 


SEQ 0167 


FI II III III I IIIT II TT II THRE REE KEE EKER EEE 


TEST AUTO-DECREMENT DEFERRED, USING RO 


SOIC IOIOICIOIOIOIIOI ITO III IIIT OTT ITO SISA SST SISO BAIR AA IARI ANIA AAA AAA IAA 


TEST 267 


1S267: 
000267 


026054 
026060 


026060 


026054 026056 


026056 


000631 


026056 026054 MOR6: 


000632 


026054 026056 MOR7: 


(R2) 
#267, (R2) 
TS270-10 
avA 
DAA+4 
#A+4,RO 
#A,dAA+2 
RO,a-(RO) 


#A+2,R0 
MOR6 


#631,-(R2) 
-(R2) 


HA+2 ,a#A 
MOR7 


#632,-(R2) 
-(R2) 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

:BR_TO ERROR HALT ON SEQ ERROR 
;CLEAR LOC A 

:CLEAR LOC A+4 

:RO STORES ADDR A+4 

STORE ADDR A_IN LOC At2 

CHECK THAT RO IS DECR BY 2 BEFORE 
:BEING USED AS THE SOURCE OPERAND 
RO DECREMENTFD BY 2? 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

PF WHICH FOLLOWS W/ 762 

sMOVE TO MAILBOX # *xxexee 637 

:SET MSGTYP TO FATAL ERROR 

:RO WAS NOT DECREMENTED BY 2 


[CHECK CONTENT OF RO WAS DECR BY 2 BEFORE 
“BEING USED IN THE "‘ADD'' INSTR 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 752 

[MOVE TO MAILBOX # «exexee 632 

:SET MSGTYP TO FATAL ERROR 

[LOC A STORES WRONG DATA 


KRKKRKKE 


RHKKEKE 


SLOC A+2 STILL STORES A? 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


AAAA 
iounwu 


AAAA 


ee 
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3 CONDITIONAL BRANCH INST. AND 
é REPLACE THE MOVE INSTRUCTION 
3 WHICH FOLLOWS W/ 742 
012742 000633 #633,-(R2) sMOVE TO MAILBOX # eeewene 633 sencane 
005242 -(R2) 
000000 


;SET MSGTYP TO FATAL ERROR 
sLOC A+2 STORES WRONG DATA 


005737 026060 : anA+4 SLOC A+4 STILL STORES 0? 


001404 TS270 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 733 

012742 #634 ,-(R2) sMOVE TO MAILBOX # *keenee 634 xekeeee 

005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

000000 ;LOC_ A+4 DID NOT STAY CLEAR 
: OR SEQUENCE ERROR 


AAAA 
fun 
“nud 





CJKDB-8 hk CPU_DIAG. 
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026502 


026524 


026526 
026532 
026534 


026566 
026572 
026574 


026576 
026600 


0 4 
026632 


10:52 


000270 
177777 
026520 


000635 


000271 
026054 
000004 
026556 026060 


000636 


000272 


026054 026060 
026054 


000004 
026624 026054 


N 13 
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TEST AUTO=DECREMENT DEFERRED, USING RO 


SEQ 0169 


FREER EERE REE REE REE ERE REE REREEREE RRR ERE REED 


-SBTTL INSTRUCTION USING PC AS SOURCE REGISTER 


IN INDEX, INDEX DEFERRED, RELATIVE, AND 
sRELATIVE DEFERRED MODES, DESTINATION WILL CONTAIN 
: + THE PC COUNT OF THE CURRENT INSTRUCTION +4, 


TTT ITIIIIITITI TIT TLT TTT TT TIS TTT LETT LETTE LETTE EET TTT TTT TTT 


STEST 270 TEST PC AS SOURCE IN MODE 0, USING RO 
REI IOI IIIIUUIIDIIIIUIOUUOIII IDET R EERE ERE TEE EERE EEE EERE EERE ERE EEE 
TS270: INC (R2) UPDATE TEST NUMBER 
CMP #270, (R2) s SEQUENCE ERROR? 
BNE TS271-10 [BR TO ERROR HALT ON SEQ ERROR 
MOV #-1,RO ‘so ALL 1 IN RO 
PCNO1: MOV PC,RO STORES PC IN RO 
CMP #PCNO1+2,R0 =RO STORES PC+2? 
BEQ TS271 


WHICH FOLLOWS W/ 
MOV #635 ,-(R2) 
INC -(R2) :SET MSGTYP TO FATAL ERROR 
HALT [RO STORED WRONG VALUE 

; OR SEQUENCE ERROR 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST 
REPLACE THE MOVE 5 ee 


. AND 


“MOVE TO MAILBOX # *keeeee 635 teeeene 


FRR ERE KEE REE KER ERE ERE EEE EERE EERE EERE ERE REE REE EE 


sTEST 271 TEST PC AS SOURCE IN MODE 6, USING RO 


iain wera dae oe cee pede amen ce re ee 


TS271: INC (R2) ZUPDATE TEST NUMBER 
CMP #271, (R2) : SEQUENCE ERROR? 
BNE TS272=10 [BR TO ERROR HALT ON SEQ ERROR 


MOY #A,RO :RO STORES ADDR 
PCN2: MOV Pc. 4(RO) 7 EF FECTIVE ADDR IS A+4 

CMP #PCN2+4,@MAt4 LOC A+4 STORES PC+4? 

BEQ TS272 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 767 

MOV #636,-(R2) :MOVE TO MAILBOX # *keaxee 636 tteeeee 

INC -(R2) :SET MSGTYP TO FATAL ERROR 

HALT ;LOC_ A+4 STORED WRONG VALUE 


> OR SEQUENCE ERROR 


DR RRR RRR KERR ERK RRA KERR RRR EERE EERE EERE EEE EEE EEE 


TEST 272 TEST PC AS SOURCE IN MODE 7, USING RO 


[osenettacasuenoneseqenanneaqesqnensveqnsesseses ontanennpeneneneniyaiennseneneteees 


TS272: INC (R2) ;UPDATE TEST NUMBER 
CMP #272, (R2) S SEQUENCE ERROR? 
BNE TS273-10 ‘BR TC ERROR HALT ON SEO ERROR 
SLOC A+4 STORES ADDR 
MOV #A_RO ‘RO STORES ADDR A 
PCN3: MOV PC a4 (RO) ‘EFFECTIVE ADDR IS A 
CMP aPCN3+4, OHA SLOC A STORES PC+4? 


CJKDB-8 DCF11=AA CPU_DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


026744 


026746 


026756 


012742 
095242 
000000 


012742 
005242 
000000 


005212 


001404 


012742 
005242 
000000 


000273 
026056 


177166 
026666 


000274 
026054 


177126 
026726 


000641 


000275 
052525 


B 14 
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T272 TEST PC AS SOURCE IN MODE 7, 


° 
e 
. 


MOV #637,=(R2) 
INC -(R2) 
HALT 


[MOVE TO MAILBOX # 
:SET MSGTYP TO FATAL ERROR 
tL 


170 
USING RO SEQ 0170 
TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ is 


nuoudn 


REEKKHK RRRKKERE 


STORED WRONG VALUE 
OR SEQUENCE ERROR 


FRR REE RRR KERR ERR KEKE EER EERE EEE ERE ERER EEE EERE EE 


TEST 273 


TEST PC AS SOURCE IN RELATIVE DEFERRED MODE ,USING RO 


SIU II IOIN IIIS IIIS ISIS ISI IOIIIDUIUOUD EE nnn ht nn tetnenes 


18273: (R2) 

#273,(R2) 
TS274-10 
BAse GOA 


,aA 
WPENG4, aFA+2 
274 


c 


026054 
026056 


#640,-(R2) 
INC -(R2) 
HALT 


“MOVE TO MAILBOX # 
‘SET MSGTYP TO FATAL ERROR 
[LOC A+2 STORED WRONG VALUE 


;UPDATE TEST NUMBER 

SEQUENCE ERROR? 

;BR TO ERROR HALT ON SEQ ERROR 
;LOC_A_ STORES ADDR At2 
sEFFECTIVE ADDR IS At2 

LOC A+2 STORES PC+4? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; COND I 


TIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 
keaaaak 640 


AAAA 
i | 


RARKRRREK 


OR SEQUENCE ERROR 


FEAR RRR REE ERR KEE ERE REAR EERAREAEAR ERR AERERREEERREKKEKEERER EAE 


TEST 274 


TEST PC AS SQURCE IN RELATIVE MODE ,USING RO 


nage -pepactneselenamer= mre" re haere peat anemone 


7S274: (R2) 
#274, (R2) 
15275-10 
aA 


PCNS: 
026054 


PC,A 
#PCNS+4 ,aHA 
TS275 


#641,-(R2) 
-(R2) 


“MOVE TO MAILBOX # 


UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
BR TO — HALT ON SEQ ERROR 


: CLEAR 
SEFFECTI VE ADDR IS A 
:LOC A STORES PC +4? 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE “_ INSTRUCTION 
WHICH FOLLOWS WwW ae | 


Raaknee 


;SET MSGTYP TO FATAL ERROR 


A AAA 
“uw u 
fou 
ee 


uiuud 


eRingeeee 


[LOCATION A STORED WRONG VALUE 


OR SEQUENCE ERROR 


LEAR AERA ERE RE REE R ERA AAREARAEEEEKEERERERERE RRR REED 


‘SBITL 


THE NEXT THREE TESTS EXERCISE MASKING ACTION OF MICROCODES. 


FREER ER ERE ERE ERE EERE eee 


STEST 275 


TEST SUB INSTRUCTION, SM=0, DM=2 


pesesestocedenbessenatennnonseqsesosunneesenesecosioneennenbeNenecenn tebe enentenens 


TS275: INC (R2) 
CMP #275,(R2) 
BNE T$276-10 


000000 MOV #052525 ,aa0 


: UPDATE TEST NUMBER 


SEQUENCE ERROR? 


;BR TO YB Bets ON SEQ ERROR 


SET UP LOC 
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026764 012701 050505 #050505,R1 +43 UP R1 
005000 RO CLEAR RO 
160120 R1,(RO)+ ; SUBTRACTION, SM=0,DM=2 
022737 002020 #2020, a#0 :CHECK DIFFERENCE AT LOC 0 


001404 TS276 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 764 
012742 000642 #642,-(R2) [MOVE TO MAILBOX # txaeeee 642 seneene 
005242 ‘ -(R2) :SET MSGTYP TO FATAL ERROR 
027012 000000 [WRONG RESULT FROM SUBTRACTION 
; OR SEQUENCE ERROR 


AAAA 
nut tt 
iounun 
ao out at 


PRE RRR ERE RETR ER ERE E RETR REE ER ERE Te eRe Tee 
sTEST 276 TEST MFPD WITH RO, IN MODE 2 
eget wer anise caeeae tett moe ee 
027014 005212 S276: (R2) ;UPDATE TEST NUMBER 
000276 C #276, (R2) + SEQUENCE ERROR? 
TS277-10 ;BR TO ERROR HALT ON SEQ ERROR 
052525 000000 a oc 0 


4 i 
170000 150734 #170000,PS SET USER MODE ON, CURRENT & PREVIOUS 
027300 MUSTBOT ,R6 7SET USER STACK POINTER 
—s sMODE 2, MFPD 
150722 SET KERNEL MODE 
052525 000214 7852525, -USTBOT- 2" on 0 ak choc DATA ON STACK 
000643 #643,-(R2) “MOVE TO MAILBOX # s#eaeee 6435 eeeneee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
HALT > INCORRECT DATA FROM MFPD 
27074 BRMF PD : 


FERRARA ARARREREEAEREERERREREREAEEAEAEERRERAETARTRERERERRERERERERERRERRRRe eee eee ee 
TEST 277 TEST MTPD WITH RO, IN MODE 2 
teeter Gets ce, AOA DEST CADE Oe ee 
027074 005212 1S277: (R2) ;UPDATE TEST NUMBER 
000277 #277, (R2) SEQUENCE ERROR? 
END] ;BR_TO ERROR HALT ON SEQ ERROR 
170000 150664 #170000,PS :SET USER MODE ON, CURRENT & PREVIOUS 
027300 #USTBOT ,R6 7SET USER STACK POINTER 
125252 #125252,-(R6) :PUSH DATA IN USER STACK 
000000 000000 #0,a40 0 


RO 
(RO) + . 
150636 PS SET KERNEL MODE 
125252 000000 thts Fee ZCHECK DATA ON LOC 0 
“BR TO TRAP TEST IF NO ERROR 
000644 $66 = (R2) sMOVE TO MAILBOX # xeeeeee 644 eeeneee 
-(R2) SET MSGTYP TO FATAL ERROR 
: INCORRECT DATA FROM MIPD 


000645 : #645,-(R2) :MOVE TO MAILBOX # eeeeee 645 seeenee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
7 SEQUENCE ERROR 
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027170 000402 BRTAB: 


. SAME AS BHIS 
027224 ° SAME AS BLO 


027226 


027242 037717 
027244 177400 


Z 
Z 
N 
N 
7 
Z 
N 
N 
C 
i ¢€ 
V 
V 
C 
C 


027262 
-RADIX 


027264 -BLKW 6 

027300 USTBOT: 
DITO TOR ERR RRR RR RE EEE RENEE EERE REE R ER RRR EERE eee 
; THE FOLLOWING ARE SPECIAL CPU TRAP 
;HANDLERS TO TRAP AND REPORT SPECIAL TRAPS. 


. 
LARA ARERR ERE RRA ERA ERR ERE AREER REAR EREREEEER RRR RAe Ree e Rhee eeee 


027300 104: 
012742 000646 #646,-(R2) sMOVE TO MAILBOX # s##ee8 646 eeerene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 ro10 TRAPPED THRU LOC. 4 


012742 000647 #647,-(R2) MOVE TO MAILBOX # saeenne 647 sennene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 rwia ; TRAPPED THRU LOC. 10 


012742 000650 #650,-(R2) sMOVE TO MAILBOX # seeeeee 650 weneeee 
027324 005242 -(R2) SET MSGTYP TO FATAL ERROR 
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027326 000000 1030 ; TRAPPED THRU LOC. 14 
012742 000651 ‘ #651,=-(R2) MOVE TO MAILBOX # *aeeane aentene 
2 -(R2) ;SET MSGTYP TO FATAL ERROR 
1034 ; TRAPPED THRU LOC. 30 


012742 000652 #652,-(R2) :MOVE TO MAILBOX # *eeee8 stanene 
005242 =-(R2) SET MSGTYP TO FATAL ERROR 
000000 aa > TRAPPED THRU LOC. 34 
012742 000653 : #653,-(R2) :MOVE TO MAILBOX # seeeewe tenenee 
005242 -(R2) >SET MSGTYP TO FATAL ERROR 
000000 sea H ‘TRAPPED THRU LOC. 114 
012742 000654 : #654,-(R2) :MOVE TO MAILBOX # «xeenee eenenes 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 10250 ; TRAPPED THRU LOC. 244 
012742 000655 é #655,-(R2) :MOVE TO MAILBOX # *e«xaee 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
027376 000000 HALT [TRAPPED THRU LOC. 250 
~SBTTL ** STARTING OF TRAP TEST ** 


027400 SECPRT: 
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8570 
8571 000000 REPT 0 
8572 
8573 
8574 PART TwO: F11 TRAP TEST, THIS IS THE SECOND 
8575 PART OF THE MAIN PROGRAM. 
8576 
8577 
a255 ABSTRACT 
8580 THIS IS A TEST OF ALL OPERATIONS AND INSTRUCTIONS THAT CAUSE 
8581 TRAPS. ALSO TESTED ARE TRAP OVERFLOW CONDITIONS, 
244 ODDITIES OF REGISTER 6, INTERRUPTS , THE RESET AND WAIT INSTRUCTIONS. 
8584 .ENDR 
8585 
8586 .LIST ME 
8587 .NLIST MC,MD,CND 
8588 ABS 
8589 000006 SP=%6 
8590 000006 R6=%6 
8591 000003 TAB=%3 
8592 000001 LAST=%1 
8593 000005 FIRST=%5 
8554 000002 R2=%2 
8595 0000 Hi T=HALT 
85 000003 TRT= \ 
8597 000004 ITRAP5=4 
8598 000004 RTRAP5=4 RESERVED INST AND ILLEGAL ADDRESSES 
8599 000014 RTRAP4=14 FOR TRACE TRAP 
8600 000030 RTRAP3=30 FOR EMULATOR TRAP 
8601 000020 RTRAP2=20 FOR IOT TRAP 
8602 000034 RTRAP1=34 FOR TRAP INST 
8603 177564 TTCSR=177564 
177560 TRCSR=177560 
177564 TPS=177564 
177566 TPB=177566 
000240 BELL=240 
000240 NOP=240 
177776 STATUS=177776 
000077 TRAPA=77 
8611 000010 RTRAP=10 
8612 004700 ILLA=004700 
8613 000100 ILLB=100 
8614 177776 CC=177776 
8615 001000 BUFF =STBOT 
8616 
8617 
8618 
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SPECIAL CASE OF ODD;.EVEN .BYTE AND REGISTER 6 
000000 HERE=0 


Ronen 000024 


3 


TESTNI 


elelelalelelelelelelS 


027426 000000 
027430 TESTN1: 


OI ISIOIIIICIIIOIIOIOIOIOIIIOIIOIOI III TOR IOI IT OTTO TOTO ISA SOSA III I AANA AAAI SAAS SA IAA SSA AAA 
STEST 300 TEST AUTO INCREMENT AND DECREMENT OF R6 FOR WORD AND BYTES 
oi ata iy oa Ne asl 
027430 005212 S300: (R2) UPDATE TEST NUMBER 
000300 #300, (R2) SEQUENCE ERROR? 
TS301-10 ;BR TO ERROR HALT ON SEQ ERROR 


%6 
150332 (6) +,HERE SIX SHOULD INCREMENT BY TWO 
000002 CMP 46,42 
027452 001404 BR1 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 771 
027454 012742 000656 #656,-(R2) sMOVE TO MAILBOX # *kexewe 656 xetenee 
027460 005242 -(R2) :SET MSGTYP TO FATAL ERROR 
027462 000000 :R6 DID NOT AUTO INCREMENT BY TWO 


012706 001000 : #1000, %6 
000000 ~(6) ,AHERE ;SHOULD DECREMENT BY TWO 
527 000776 46,4776 
027509 001404 BR2 


AAAA 
| 
nowy 
“iu 
hou wu 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 756 
027502 012742 000657 #657,-(R2) “MOVE TO MAILBOX # ****eee 657 kenenee 
027506 005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
027510 000000 ;R6 DID NOT AUTO DECREMENT BY 2 


out ou 
| 
iuut 


ANAAA 
ee 


027512 005006 %6 
(6)+,(6)+ ;DOUBLES AUTO INCREMENT OF R6 
000004 %6 44 
027522 001404 BR3 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 745 
027524 012742 #660,-(R2) “MOVE TO MAILBOX # sxxxnee 660 weeenee 
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027530 005242 =(R2) ;SET MSGTYP TO FATAL ERROR 
027532 000000 ;WRONG AUTO INCREMENT OF R6 


46 

44 

(6)+,(4)+ TEST INCREMENT OF R6 
46,42 


027546 BR4 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 

; WHICH FOLLOWS W/ 733 

027550 000661 #661,-(R2) [MOVE TO MAILBOX # Sexsees, 661 seeeees 

027554 =(R2) SET MSGIYP.TO FATAL ERROR 

027556 000 :WRONG INCREMENT OF R6 


027560 : a 
(4)+,(6)+ TEST INCREMENT OF R6 
000002 ot 


027572 001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

F WHICH FOLLOWS wW/ 721 

027574 012742 000662 #662 ,-(R2) sMOVE TO MAILBOX # xkexeee 662 weenene 

027600 05242 -(R2) 7SET MSGTYP TO FATAL ERROR 

027602 000000 WRONG INCREMENT OF R6 


%6 
44 
(6)+,(4)+ TEST INCREMENT OF R4 


000001 44,8) 
027616 001404 BR6 


AAAA 
teu 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
‘ REPLACE THE MOVE INSTRUCTION 
r WHICH FOLLOWS W/ 707 
027620 012742 000663 #663,-(R2) sMOVE TO MAILBOX # eeweee 663 weaeeee 
-(R2) :SET MSGTYP TO FATAL ERROR 
sWRONG INCREMENT OF R4 


AAAA 
mow 


tt 
now tt 
| 


%6 


%4 
(4)+,(6)+ TEST INCREMENT OF R6 
000002 %6 #2 
001404 BR? 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS wW/ 675 
012742 000664 #664 ,-(R2) :MOVE TO MAILBOX # xxexene 664 *teewee 
005242 -(R2) >SET MSGTYP TO FATAL ERROR 
007652 000000 SWRONG INCREMENT OF R6 


027654 005006 : %6 
027656 005004 14 
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CJKDBB.P11 


027670 
027674 
027676 


027700 
027704 


027710 
027714 


027716 
027722 
027724 


027726 


027764 
027772 


027774 
030000 
030002 


030042 
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122426 
020427 
001404 


012742 
005242 
000000 


001404 


012742 
005242 
00 


012767 


001404 


012742 


000001 


000665 


001000 
000000 
000776 


000666 


000301 
123456 


027414 


050456 


000667 


123456 


027416 
177346 


000670 


MACY11 30A(1052) 
1300 


177450 
177432 


177412 


177402 
177364 


050456 
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TEST AUTO INCREMENT AND DECREMENT OF R6 FOR WORD AND BYTES 


TEST INCREMENT OF R4 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 663 

[MOVE TO MAILBOX # xxeeee 665 

:SET MSGTYP TO FATAL ERROR 

[WRONG INCREMENT OF R4 


RAKE EKE 


TEST DECREMENT OF R6 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 650 

“MOVE TO MAILBOX # *x*eeee 666 
:SET MSGTYP TO FATAL ERROR 

[WRONG DECREMENT OF R6,0R WRONG $TSTNM 

; OR SEQUENCE ERROR 


REKKKKHK 


ANAAA 


AAAA 


SEQ 0177 


FT III KKK II II KKK KERR ERE RE REE RRR EERE EEE EERE EEE 


TEST TRANSFER OF .BYTE USING R6 


ian. tet ih anaes es aaeaee See? meee CO 


19=JUN=79 

CMPB (4)+,(6)+ 
CMP 44,4) 
BEQ BR10 
MOV #665 ,=-(R2) 
INC -(R2) 
HALT 

BR10: MOV #1000,%6 
CMPB -(6), AHERE 
CMP #776, 46 
BEQ 1S301 
MOV #666,-(R2) 
INC -(R2) 
HALT 

sTEST 301 

TS301: INC (R2) 
CMP #301, (R2) 
BNE TS302-10 
MOV #123456,K5 
MOV #050505,K1 
MOV #K1,%5 
MOV #K5.%6 
MOVB (6)+,(5)+ 
CMP #050456,K1 
BEQ BR11 
MOV #667,-(R2) 
INC -(R2) 
HALT 

BR11: MOV #123456,K5 
MOV #050505,K1 
MOV =< %5 
MOV #kK6,%6 
MOVB -(6),(5)+ 
CMP K1,4050456 
BEQ BR1i2 
MOV #670,-(R2) 


sUPDATE TEST NUMBER 
SEQUENCE ERROR? 
:BR TO ERROR HALT ON SEQ ERROR 


3%5=(050505)K1 
3%6=(123456)K5 
:LOW .BYTE OF R6 TO R5 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 760 
“MOVE TO MAILBOX # **x*eee =667 
:SET MSGTYP TO FATAL ERROR 
[FALSE TRANSFER OF .BYTE 


RRKKEKE 


3%5(050505)k1 
3%6(123456)K5 
:LOW .BYTE OF R6 TO R5 (DECREMENT) 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 


é CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 735 


“MOVE TO MAILBOX # 


kRaeekkee 


670 


Reeaeee 


AAAA 


A AAA 


“aoeuw 


Howou ow 
| 


Te ee | 


oe Deelah CPU_D 
DBB.P 


030110 
030114 
030116 


030120 
030126 
030134 
930140 
030144 
030146 
030154 


030156 
030162 
030164 


030222 


030224 


030252 


005242 
000000 


012742 
005242 
000000 


012767 


001404 


012742 
0 


001404 


012742 
005242 
000000 


005212 


001404 
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123456 


027414 
050456 


000671 


123456 
050505 
027405 
027414 


177242 


000672 


123456 


027414 
042456 


000673 


000362 
177150 


MACY11 30A(1052) 
1301 


177324 
177326 


177306 


177256 
177260 


050647 


177210 
177212 


177162 


177147 


BR1i2: 


BR14: 


19=JUN=79 


=(R2) 


#123456,K1 
#050505,K5 
p>) 

AKS ,%6 


(5)+, (6)+ 
#050456,K5 
BR13 


#671,-(R2) 
-(R2) 
#123456,K1 


#050505 ,K5 


(5)+, (6)+ 
K5, #050647 
BR14 


#672,-(R2) 
-(R2) 


#123456,K1 
tet a K5 


6 KS 26, )+ 
#042456,K1 
TS302 


#673,-(R2) 
~(R2) 


J 14 
11:08 PAGE 1 
TEST TRANSFER OF .BYTE USING R6 


INC 
HALT 


78 


;SET MSGTYP TO FATAL ERROR 
FALSE R6 .BYTE TRANSFER 


3 (123456) 
3; (050505) 
:LOW OF R5 TO LOW OF R6 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 712 
MOVE TO MAILBOX # x%xKeKe = 677 
;SET MSGTYP TO FATAL ERROR 
[FALSE R6 .BYTE TRANSFER 


RRKKKEH 


3123456 
3050505 
ZHIGH OF RS TO LOW OF R6 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 667 
sMOVE TO MAILBOX # *%*eeeee 672 
:SET MSGTYP TO FATAL ERROR 
[FALSE R6 .BYTE TRANSFER 


RRRKKEEK 


:R5-123456-ODD ADDRESS 
3R6-050505--.EVEN ADDRESS 
:LOW OF R6 TO HIGH OF R5 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 644 

[MOVE TO MAILBOX # xexxeee 673 

:SET MSGTYP TO FATAL ERROR 


KEKEERE 


AAAA 
foutu 
wut t 
fiw 
Le 


AAAA 


AAAA 


“uuu 


“uuu 


FAILED LOW OF 6 TO HIGH OF 5,.OR WRONG $TSTNM 


; OR SEQUENCE ERROR 


iouw a 
nu 


“nuu 


SEQ 0178 


FRR IT TTT TOR EKER ERE KER ERE KEE EERE REE EERE EERE EEE 


TEST BYTE OPERATION WITH SEQUENTIAI ODD-EVEN ADDRESS 


FR RR REE EERE RRR EERE REE KER ERE ERE REE ERRERAEAR EERE 


TEST 302 
7S302: 


(R2) 
#302, (R2) 
TS303-10 
K7,K7+1 
BRiS 


UPDATE TEST NUMBER 

; SEQUENCE ERROR? 

:BR TO ERROR rg ON see ERROR 
SAME .WORD LOW TO HIGH 








K 14 
CJKDB-8 mak CPU_DIAG MACY11 30A(1052) 19=JUN=79 11:08 PAGE 179 
CJKDBB.P11 19=JUN=79 10:52 7302 TEST BYTE OPERATION WITH SEQUENTIAL ODD-EVEN ADDRESS SEQ 0179 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE gre i Maman 


030254 012742 000674 #674,-(R2) [MOVE TO MAILBOX kh een 
030260 005242 =(R2) :SET MSGTYP TO FATAL ERROR 
030262 000000 :SHOULD COMPARE LOW TO HIGH 


126767 177131 177126 : K7+1,K7 COMPARE ODD TO .EVEN SAME .WORD 


030264 

030272 001404 BR16 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 763 

030274 012742 000675 #675,-(R2) “MOVE TO MAILBOX # kxeeeeee 675 weeenen 

030300 005242 -(R2) ;SET MSGTYP TO FATAL ERROR 

030302 000000 [ODD TO .EVEN .BYTE FAILURE 


0304 126767 177113 177106 : he ei aad sSEQUENTIAL .BYTES 


03 

030312 001404 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 753 

030314 012742 000676 #676,-(R2) sMOVE TO MAILBOX # *keeeee 676 RHEE ER 

030320 005242 -‘R2) :SET MSGTYP TO FATAL ERROR 

030322 000000 :ODD TO .EVEN FAILED 


030324 126767 177072 177064 : K10,K6 
030332 001404 BR20 


“nun 


AAAA 
inn u 
tun 
Hund 


AAAA 
“wut 
Huu 
fount 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 743 
012742 000677 #677 ,-(R2) :MOVE TO MAILBOX # *keeee 677 tekKEE® 
-(R2) :SET MSGTYP TO FATAL ERROR 
>.EVEN TO EVEN FAILED 


AAAA 
ioinou wu 


177051 177051 : K7+1,K10+1 
BR21 


030352 001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 733 
030354 012742 000700 #700,-(R2) 7MOVE TO MAILBOX # *xxxeee 700 xeennen 
005242 -(R2) 7SET MSGTYP TO FATAL ERROR 
000000 [ODD TO ODD FAILED 


Huu nu 
woe ul 
nuinwu 


AAAA 
“nunu 


030364 126767 177032 177031 : K10,K10+1 
030372 001004 BR22 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 723 
030374 012742 000701 #701,=(R2) [MOVE TO MAILBOX # *xaeeee 70] senneee 
030400 005242 -(R2) [SET MSGTYP TO FATAL ERROR 
030402 000000 [LOw TO HIGH IN SAME .WORD FAILED 


AAAA 
“aun 
nue 
woud 
Wiuuu 





L 14 
CJKDB=B DCF11=AA CPU_DIAG. MACY71 30A(1052) 19=JUN-79 11:08 AGE 180 
CJKDBB.P11 19=JUN=79 10:52 1302 TEST BYTE OPERATION WITH SEQUENTIAL ODD-EVEN ADDRESS SEQ 0180 


C30404 126767 177013 177011 BR22: CMPB K10+1,K10+1 
030412 001404 BEQ BR23 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 713 
012742 000702 #702,-(R2) sMOVE TO MAILBOX # *xxexee 702 xeantnn 
-(R2) :SET MSGTYP TO FATAL ERROR 
HIGH TO LOW IN SAME .WORD FAILED 


126767 176772 176767 BR23: K10,K7+#1 
001004 BN T5303 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 703 
012742 000703 MOV #703,-(R2) “MOVE TO MAILBOX # texaeee 703 xeeeene 
005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
000000 HALT + EVEN TO ODD FAILED,OR WRONG $TSTNM 
: OR SEQUENCE ERROR 


FRR III IIIS ORCI IORI III DADA IA ISISII IIIA ISI IIIS IIIA III IAIN AISI AAI AI AAIIISAIASN AA AH 
TEST 303 TEST THE CC BITS 
FIO ICICI ICICI ROI TAIT IIIAIA ASIII IIIS IIIA II AI IIIS AIA AI IA AAI AISIM AIA AAA AAA HM 
005212 S303: : (R2) ;UPDATE TEST NUMBER 
000303 #303, (R2) SEQUENCE ERROR? 
TS304-10 BR TO ERROR HALT ON SEQ ERROR 
:SET STATUS 
147314 STATUS ;CLEAR STATUS 
BR33 


: TO SCOPE: ee THE RIGHT BYTE OF THIS 
: ONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 773 

012742 #704 ,-(R2) sMOVE TO MAILBOX # xxxxxxe 704 xetnnen 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 :C NOT CLEAR 


102004 : BR34 


005067 
103004 


AAAA 
“una 


; TO SCOPE: CLEAR THE RIGHT BYTE ol THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE STATION 
; WHICH FOLLOWS W/ 766 

012742 000705 #705,-{R2) :MOVE TO MAILBOX # ake e ee 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 :V NOT CLEAR 


i 
noun 
“wnuu 


AANA 
wun u 


001004 BR35 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 761 
030510 012742 000706 #706,-(R2) “MOVE TO MAILBOX # seaxaxe 706 seeenee 
030514 005242 -(R2) SET MSGTYP TO FATAL ERROR 





CJKDB=B DCF11=AA CPU_DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


030542 


030544 
50 


000000 
100004 


012742 
005242 
00000 

000257 
052767 
103404 
012742 


005242 
000000 


102404 


012742 


001404 


012742 


000707 


000017 


000710 


000711 


000712 


000713 


000304 
001000 


MACY11 30A(1052) 
7303 


147234 


BR35: 


BR36: 


BR37: 


BR4O: 


BR41: 


19=JUN=79 


TEST THE CC BITS 


HALT 
BPL 


BR 36 


#707,-(R2) 
-(R2) 


#17,STATUS 
BR37 


#710,-(R2) 
-(R2) 

BR40 
#711,-(R2) 
-(R2) 

BR4i 
#712,-(R2) 
-(R2) 
TS304 


4#713,-(R2) 
-(R2) 


M 14 
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72 NOT CLEAR 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL SRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 754 

sMOVE TO MAILBOX # *xexeee = 707 
SET MSGTYP TO FATAL ERROR 
:N NOT CLEAR 

:CLEAR CONDITION CODES 

SET STATUS TO ONES 


RHEEEEK 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 743 
sMOVE TO MAILBOX # *eexeee 710 
;SET MSGTYP TO FATAL ERROR 

:C NOT SET 


RRKKKKK 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 736 

:MOVE TO MAILBOX # ve 711 
:SET MSGTYP TO FATAL ERROR 

:V NOT SET 


KKEKKKEK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE yes INSTRUCT ION 
WHICH FOLLOWS W/ 731 

;MOVE TO MAILBOX # 712 

:SET MSGTYP TO FATAL ERROR 

:Z NOT SET 


REEKKKK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
Z REPLACE THE ey INSTRUCTION 
: WHICH FOLLOWS W/ 724 
sMOVE TO MAILBOX # raw 713 
Hoy MSGTYP TO FATAL ERROR 

NOT SET,OR WRONG $TSTNM 
™ OR SEQUENCE ERROR 


RRARKKKEK 


AAAA 
wnuu 


AAAA 


AAAA 
“wud 
niuiuu 
foun ou 
“unwed 


AAAA 
nu u 
Hien u 
“iwuwu 
nuiun 


SEQ 0181 


Fe Re Be HI HII KTH HT TT IT TTT KK RRR E KEKE E EKER EKER EKER EERE EERE EE 


TEST 304 


7$304: 


INC 
CMP 
BNE 
MOV 


TEST THAT A TRAP OCCURS ON A RESERVED INSTRUCTION 


it. et dee Tee aRRAa teat eee Poe ee 


(R2) 
#304,(R2) 
RETA 
BUFF ,SP 


UPDATE TEST NUMBER 


2 SEQUENCE ERROR 
TO ERROR HALT ON SEQ ERROR 
STACK POINTER SETUP 


CJKDB-B DCF11=AA CPU_DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


030744 
030750 
030752 


030754 


012767 
000077 


012742 
42 


012742 
005242 
000000 


005212 


000077 


030646 


000714 


600305 


001000 
030672 


000774 


000715 


000306 


001000 
030734 


030734 


000716 


000307 


001000 
031006 
146774 


N 14 
MACY11 re wee os to a 11:08 PAGE 182 


8 
TEST THAT A TRAP OCCURS ON A RESERVED INSTRUCTION SEG 0182 


147154 V MRE TAH, RTRAP RETURN LOCATION 
RETA RESERVED INSTRUCTION, SHOULD TRAP 


#714,=(R2) sMOVE TO MAILBOX # *aeeeee 714 thenene 
-(R2) ;SET MSGTYP TO FATAL ER ROR 
ne Ties ;RESERVE INSTRUCTION DIDN'T TRAP,UR WRONG $TSTNM 


JOOS IIIOIIOIOISIISIDIOIIOIIOIOIDIDIOISIOIOIOIOIOIOI IIIT TOT I TOT TT TET TTT TT TT TI TOTO TTT TTI TS I IEE 
STEST 305 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 
te tape ach a lettermen gre arn aa ete heh ts 
$305: (R2) UPDATE TEST NUMBER 
CMP #305, (R2) s SEQUENCE ERROR? 
TS306-10 BR TO ERROR HALT ON SEQ ERROR 
ABUF F , SP :STACX POINTER SETUP 
147120 MO ARETB,RTRAP :RETURN POINTER 
SRESERVED INSTRUCTION 
SP , ABUF F =4 TEST DECREMENT OF SP 


TS306 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 766 
#715,-(R2) [MOVE TO MAILBOX # sxexaee 715 seenene 
=(R2) :SET MSGTYP TO FATAL ERROR 
‘NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
: OR SEQUENCE ERROR 
FRIIS ISSA AANA AS AASISIIIIASI SI SII III ISI II AISI INI SNSIA NASA ISAS Ae Se 
[TEST 306 TEST THAT PROPER P.C. IS SAVED 
FIER ERE KR KKK RRR KEE KEE KEKE REE KKK EEK EEK EEE KEE EEE KEE 
TS306: (R2) :UPDATE TEST NUMBER 
#306, (R2) SSEQUENCE ERROR? 
TS307-10 ‘BR TO ERROR HALT ON SEQ ERROR 
#BUFF , SP [STACK POINTER SETUP 
147056 MO #RETC.RTRAP [RETURN FROM TRAP POINTER 
INSTC: STRAP ON THIS INSTRUCTION 
150032 RETC: BUF F ~4 [CHECK FOR INCREMENTED P.C. 


15507 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 765 
#716,-(R2) sMOVE TO MAILBOX # *«exxxwe 716 seennne 
-(R2) SET MSGTYP TO FATAL ERROR 
: INCORRECT P.C.,OR WRONG $TSTNM 
; OR SEQUENCE ERROR 
o SARSNELANSHAHAS EN SHEHATETESEHAAASAAAAEAAHAKAAHeATENAeeNseseeneTeNAseeseeNeeaeeeeseTe 
STEST 307 TEST THAT ‘‘OLD'’ CC AND PRIORITY ARE PLACED ON STACK 
FI IR RRR EK ERE REE EERE ER EERE EEE REE EERERE EERE EERE 
TS307: (R2) ; UPDATE TEST NUMBER 
C #307, (R2) s SEQUENCE ERROR? 
T$310-10 ‘BR TO ERROR HALT ON SEQ ERROR 
#BUFF SP SET UP 
147012 #RETD,RTRAP :SET UP 
cc ;CLEAR CC AND PRIORITY 


7 TRAP 


AAAA 


noun u 
uuu 


nun 


AAAA 





a 4 CJK0B=8 DCF11=AA CPU DIAG. 


JKOBB.P11 


So ss os a 
SOWNAWNSWH—O 


» oh e) 
—b od 
Mon 
— 


031006 
031014 


031016 


031070 


031072 


MACY11 30A(1652) 19=JUN=79 
19=JUN=79 10:52 T7307 
026727 147764 000000 RETD: CMP BUFF =2,40 
001404 esa BEQ 1$ 
012742 000717 MOV #717,-(R2) 
005242 INC =(R2) 
000000 a HALT 
2706 001000 . 1$: MOV #BUFF ,SP 
012767 031052 146750 MOV ARETE .RTRAP 
012767 000357 146730 MOV #357,(C 
000277 - 4 SCC 
000077 TRAPA 
026727 147720 000357 RETE: CMP BUFF -2,4357 
001404 é As. BEQ T5310 
i. i 3 
012742 000720". MOV #720,-(R2) 
005242 ae Bas INC > =(R2) 
000000 ae; ~ HALT 
ewe STEST 310° TEST THAT 
005212 7S310: INC (R2) 
022712 ONNsfS CMP #310, (R2) 
001110 BNE STPP 
012706 001000 MOV wor SP 
012767 031122 146674 MOV ARETE RTRAP. - 
005067 146672 CLR RTRAP+2 
000077 TRAPA 
RETF: 
100004  @PL 1$ 
012742 000721 MOV #721,-(R2) 
005242 INC =(R2) 
000000 - HALT 
001004 BNE 2$ 
012742 000722 MOV #722,-(R2) 
005242 INC -(R2) 
000000 os HALT 
102004 BVC 3$ 


B 15 
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TEST THAT ‘OLD’ CC AND PRIORITY ARE PLACED ON STACK 


TEST THAT OLD STATUS WENT TO STACK 


TO SCOPE: ot THE RIGHT BYTE OF THIS 
ONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCT ION 
po kyl FOLLOWS W/ 762 
“MOVE TO MAILBOX ketene 717 keenene 
;SET MSGTYP TO FATAL ERROR 
INCORRECT STATUS 
3SET UP 
:SET UP 
;SET PRIORITY 
caer 


3; TRAP 
: COMPARES STATUS ON STACK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

‘ CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 740 

“MOVE TO MAILBOX # xxeeeee 720 enka 

;SET MSGTYP TO FATAL ERROR 


S INCORRECT STATUS ON STACK,OR WRONG $TSTNM 


; OR SEQUENCE ERROR 


AAAA 


AAAA 


“ouou uu 


SEQ 0183 


APPAR RRR R RRR EO IEEE EERE EERE EREE ER SEER RHEE HEHE 


“NEW'’ STATUS IS CORRECT 


FERRARA AERA AREER ARTE EERE ERE REREAD 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


; CLEAR FUTURE PRIORITY AND CC 
sTEST FOR *'C’’ CLEARED 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 
“MOVE TO MAILBOX # xeeneee = 72] kekkeee 
sSET MSGTYP TO FATAL ERROR 
=N NOT CLEARED 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 761 
MOVE TO MAILBOX # xeeeeee 7270 reanene 
SET MSGTYP TO FATAL ERROR 


22 NOT CLEARED 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


NAAA 


iow 


CJKDB-B DCF11=AA CPU tee 
CJKDBB.P11 


031150 
031154 
031156 
031160 
031160 


031162 


031246 


031246 


031250 


19=JUN=79 . 


012742 
005242 
000000 


103004 


012742 


100404 
012742 
005242 
000000 
001404 
012742 
005242 
000000 
102404 
012742 
005242 
000000 


103404 


10:52 


000723 


000724 


“ 000340 


000725 


001000 
031234 
000357 


000726 


000727 


000730 


MACY11 as 


146576 


146564 
146560 


A(1052) 


310 


3$: 


4$: 


5$: 


RETG: 


2$: 


3$: 


19=JUN=79 


C 15 
11:08 PA 


GE 184 
TEST THAT "NEW’’ STATUS IS CORRECT 


MOV 
INC 
HALT 


BCC 


#723,=-(R2) 
=(R2) 


4% 


#724,=-(R2) 
-(R2) 


#340,(C 
5$ 


#725,-(R2) 
-(R2) 


#BUFF ,SP 


MRETG,RTRAP 
RTRAP+2 


#357, 


1$ 


#726,-(R2) 
-(R2) 


2$ 

#727 ,-(R2) 
-(R2) 

3$ 


#730,-(R2) 
-(R2) 


4$ 


: REPLACE THE gre INSTRUCTION 
WHICH FOLLOWS W/ 754 

[MOVE TO MAILBOX # ieeooes 73% 

;SET MSGTYP TO FATAL ERROR 

:V NOT CLEARED 


aeenene 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 747 
MOVE TO MAILBOX # s#eenee = 724 
;SET MSGTYP TO FATAL ERROR 
=C NOT CLEARED 
i TEST PRIORITY 


gaenenrne 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 7357 
;MOVE TO MAILBOX # seeeeee 725 
7SET MSGTYP TO FATAL ERROR 
;PRIORITY NOT ZERO 


eenneane 


7SET NEW ‘'CC’’ AND PRIORITY 
Z TRAP HERE 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH Pp eee W/ 721 
sMOVE TO MAILBOX aaaneee = 706 
;SET MSGTYP TO FATAL ERROR 

:N NOT SET 


geenene 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
. CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 714 
MOVE TO MAILBOX # s*eeeee =§=727 
:SET MSGTYP TO FATAL ERROR 

:2 NOT SET 


aaeeneene 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE “yes INSTRUCT ION 
WHICH FOLLOWS W/ 707 

“MOVE TO MAILBOX # seeenee 730 
;SET MSGTYP TO FATAL ERROR 


:V NOT SET 


gReneene 


AA 
nou 


AAAA 


vwunwut 


A AAA 


ioueou ou 


A AAA 


AAAA 
nou i 
woueou nw 
wouheu 


“wreun 


Www ou 


"ou 


nun iu 


“eww tt 


nu 


SEQ 0184 


CJKDB-B DCF11=AA CPU_DIAG, 


C JKDBB.P11 


031274 


031320 


031322 


031410 
031412 


031412 


031442 


031444 
031450 
031452 


19=JUN=79 10:52 


012742 


012742 
005242 
000000 


012742 
005242 
000000 


000731 


146466 
000017 
000340 


000732 


000012 
146446 


000311 
000012 
146424 
001000 
031412 


000733 


000312 


001000 
031436 


000774 


000734 


D 15 
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146450 


146426 


1464 34 


146400 


7310 TEST THAT ‘NEW’ STATUS IS CORRECT SEQ 0185 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
; CONDITIONAL SRANCH INST. AND  <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
: WHICH FOLLOWS W/ 702 <==== 
MOV #731,=(R2) *MOVE TO MAILBOX # ‘*eeeeee 73] sennene 
INC =(R2) =SET MSGTYP TO FATAL ERROR 
HALT :C NOT SET 
4$: MOV CC,SP 
BIC #17,S5P 
CMP #340,S5P 
BEQ STPPA 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
: CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
ak : WHICH FOLLOWS W/ 667 <==== 
MOV #732,-(R2) ;MOVE TO MAILBOX # «ewan 732 cenwene 
INC =(R2) *SET MSGTYP TO FATAL ERROR 
HALT ;PRIORITY WAS CHANGED,OR WRONG $TSTNM 
STPPA: MOV #12,10 
CLR 12 
“os tetany ata bcp cag imercnatocaciae pei eoariga faa vce geotechnical en ict 
*TEST 311 TEST THAT A TRAP OCCURS FOR A ‘'TRAP’’ INSTRUCTION 
FRR RRR RRR EEE EER EKER RE REE E RR EREREERERER ERE EE 
TS317: INC (R2) ;UPDATE TEST NUMBER 
CMP #311, (R2) ;SEQUENCE ERROR? 
BNE TS$312-10 :BR TO ERROR HALT ON SEQ ERROR 
MOV #12,10 
CLR 12 
MOV #BUFF SP :STACK POINTER SETUP 
MOV ARETA1,RTRAP1  =RETURN LOCATION 
TRAP sRESERVED INSTRUCTION, SHOULD TRAP 
MOV 4733,-(R2) “MOVE TO MAILBOX # weeeeee 733 naennne 
INC -(R2) *SET MSGTYP TO FATAL ERROR 
soa HALT ; TRAP DIDN'T TRAP,OR WRONG $TSTNM 
FRR RRR RRR REE REE REE EERE EERE EEE EE 
:TEST 312 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 
RRR RTT ITT I RRR REE RRR REE REE EERE EERE 
TS312: INC (R2) ;UPDATE TEST NUMBER 
CMP #312, (R2) : SEQUENCE ERROR? 
BNE 1$315-10 [BR TO ERROR HALT ON SEQ ERROR 
MOV #BUFF ,SP ZSTACK POINTER SETUP 
MOV eRe TAI RTRAPT ‘RETURN POINTER 
TRAP sRESERVED INSTRUCTION 
RETB1: CMP SP, ABUF F -4 :TEST DECREMENT OF SP 
BEQ TS313 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
: CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
: WHI“H FOLLOWS W/ 766 <== 
MOV 4734 ,-(R2) sMOVE TO MAILBOX # *eetewe 734 xenxnees 
INC =(R2) :SET MSGTYP TO FATAL ERROR 
HALT [NOT DECREMENTEL TWO WORDS,OR WRONG $ITSTNM 


> OR SEQUENCE ERROR 


PAAR ERA ERE REE EREERERE ERA EERE EAERREEE EERE 


CJK 


031454 


031560 


031562 


031622 


031624 
031630 
031632 


CJKDB=8 lhe CPU_DIAG. 
KDBB.P11 
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012742 
005242 
000000 


005212 


001404 


012742 


012742 
005242 
000000 


000313 


001000 
031500 


031500 


000314 
001000 


031552 
146230 


147220 


000736 


001000 
031614 
000357 


147156 


000737 


MACY71 30A(1052) 
1312 


146336 
147266 


146272 


000000 


146230 
146164 


000357 


sTEST 313 


19=JUN=79 


E 15 
11:08 PAGE 186 
TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 


TEST THAT PROPER P.C. 


IS SAVED 


SEQ 0186 


FERRARA ERE RR ERE RARER RRR RRR ERR RRR KEKE EERE KEE EERE E EE 


$313: 


RETC1: 


(R2) 

#313, (R2) 
TS314=10 
BUFF ,SP 
AMRETC1,RTRAP1 


#. BUFF =4 


18314 


#735 ,-(R2) 
2) 


UPDATE TEST NUMBER 


[SEQUENCE ERROR? 
:;BR TO ERROR HALT ON SEQ ERROR 
ean POINTER SETUP 


URN FROM TRAP POINTER, 


; TRAP ON THIS INSTRUCTION 
CHECK INCREMENTED P.C. 


° 
. 
° 


‘MOVE TO MAILBO 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDIT 


TONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS Ww.’ 765 
X & wkeaneee 735 


RRKKKKK 


:SET MSGTYP TO FATAL ERROR 
: INCORRECT P.C.,0R WRONG $STSTNM 


OR SEQUENCE ERROR 


seo yada pein de lpia inlet thant tania 


TTEST 314 


TEST THAT ‘‘OLD’' CC AND PRIORITY ARE PLACED ON STACK 


vi; wrt Mee a MeeRee RET MOG ee ee ee 


73314: 


(R2) 
#314, (R2) 
TS315-10 


A#BUFF ,SP 
“rade peed 
C 


BUF F=-2,40 
1$ 


#736,-(R2) 
-(R2) 


#BUFF , SP 
MRETE1,RTRAP1 
#357,CC 


BUFF =2,4357 
T$315 


#737,-(R2) 
-(R2) 


sUPDATE TEST NUMBER 
SEQUENCE ERROR? 
:BR —" ROR HALT ON SEQ ERROR 


SET UP 
sCLEAR CC AND PRIORITY 


; TRAP 

:TEST THAT OLD STATUS WENT TO STACK 

: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; COND 


;MOV 
:SET MSGTYP TO FATAL ERROR 


ITIONAL BRANCH INST. AND 

REPLACE THE MOVE INSTRUCTION 

WHICH FOLLOWS W/ 762 

E TO MAILBOX # «eexeee 736 


eeeeene 


: INCORRECT STATUS 
;SET UP 


sSET UP 

:SET PRIORITY 

sSET CC 

; COMPARES STATUS ON STACK 

; TO SCOPE: ta fl THE RIGHT BYTE OF THIS 


TIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 741 
“MOVE TO MAILBOX # «aenxeee = 737 
:SET MSGTYP TO FATAL ERROR 


weeeneee 


S INCORRECT STATUS ON STACK,OR WRONG $TSTNM 


OR SEQUENCE ERROR 


AANA 
ee | 
“une 


AAAA 
“uw 

nou 
iow 


oui wu 


ii 


DRE RRR RARE EERE ERE EREREE AREER eee eee eee eee eee 


sTEST 315 


TEST THAT *NEW'’ STATUS IS CORRECT 


RARER RRR EKER EERE ERE EERE TREE EERE REE RRR eee eee eee eee 


75315: 


INC (R2) 


UPDATE TEST NUMBER 
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022712 000315 #315,(R2) SEQUENCE ERROR? 
T$316-10 [BR TO ERROR HALT ON SEQ ERROR 
001000 BUFF ,SP 
031664 146156 MRETF1,RTRAP1 
146154 RTRAP1+2 :CLEAR FUTURE PRIORITY AND CC 


TEST FOR ''C'' CLEARED 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 
031666 012742 000740 #740,-(R2) “MOVE TO MAILBOX # x*xKaee 740 kaenene 
005242 -(R2) sSET MSGTYP TO FATAL ERROR 
000000 >C NOT CLEARED 


001004 ; 2$ 


031664 : 1$ 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 761 
012742 000741 #741 ,-(R2) “MOVE TO MAILBOX # *keeeee 74] neeneen 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 :Z NOT CLEARED 


031710 102004 i 3$ 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 


oto ut 
oui tt 
iouwou uw 


AAAA 
www tu 


: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 754 
031712 012742 000742 #742,-(R2) SMOVE TO MAILBOX # xexxeee 742 xeenens 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :V NOT CLEARED 


031722 103004 ; 4$ 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FS W/ 747 
031724 012742 000743 #743,-(R2) :MOVE TO MAILBOX aenxeeee 743 saennee 
-(R2) :SET MSGTYP TO FATAL ERROR 
>C NOT CLEARED 
000340 146034 : + es : TEST PRIORITY 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 737 
031744 012742 000744 #744 ,-(R2) [MOVE TO MAILBOX # *exexxe 744 «aennne 
=(R25 :SET MSGTYP TO FATAL ERROR 
:PRIORITY NOT ZERO 


AAAA 
“wowudu 
Le | 


031742 001404 


AAAA 


iow 
ed 


001000 5$: #BUFF SP 

031776 146046 #RETG,RTRAP1 

000357 146042 V #357,RTRAP1+2  ;SET NEW ‘'CC’’ AND PRIORITY 
031774 104400 TRA : TRAP HERE 





CJKDB=8 mi sae CPU_DIAG. 


CJKDBB.P 


031776 


032000 
032004 
032006 


032010 
032010 


032012 


032022 


032024 


032064 
032070 
032072 


932074 
032076 
032102 


032104 
032112 
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100404 


012742 


001404 


012742 
005242 
000000 


102404 


012742 
005242 
000000 


103404 


012742 


001404 


012742 
005242 
000000 


005212 


012767 
012767 


000745 


000746 


000747 


000750 


145724 
000017 
000340 


000751 


000316 


104776 99 
032136 


0012 
45714 


MACY71 30A( {ve 


1315 


1$: 


2$: 


3$: 


4S: 


19=JUN=79 


G 15 
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TEST THAT “NEW’’ STATUS IS CORRECT 


BMI 


1$ 
#745,=(R2) 
-(R2) 

2$ 


#746,-(R2) 
-(R2) 


3$ 


#747 ,-(R2) 
-(R2) 


4$ 


#750,-(R2) 
-(R2) 


#751,-(R2) 
-(R2) 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 721 
“MOVE TO MAILBOX # *xexxee 745 
;SET MSGTYP TO FATAL ERROR 


ReEEKKKE 


:N NOT SET 


“MOVE TO MAILBOX # 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 714 
“MOVE TO MAILBOX # *xxKeee = =746 
;SET MSGTYP TO FATAL ERROR 
NOT SET 


REKKKKEK 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ ag 


REKKKEKK 


:SET MSGTYP TO FATAL ERROR 


KEKKKEKK 


:V NOT SET 


MOVE TO MAILBOX # 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS w/ 702 
sMOVE TO MAILBOX # «xxx 750 
SET MSGTYP TO FATAL ERROR 
:C NOT SET 


RRKKERE 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE NS INSTRUCTION 

WHICH FOLLOWS W a 


REKKKKK REREKEK 


SET MSGTYP TO FATAL ERROR 


[PRIORITY WAS CHANGED,OR WRONG $TSTNM 


. 
c 


OR SEQUENCE ERROR 


A AAA 
iu i 
nunu 
iuww u 
ee | 


AAAA 


uuu 


SEQ 0188 


g RSOSSS SSR SAAS ASR SOAHSSES SHAS SeeseseseenanenssseegagenceseveneseseesseseseeeeNseees 


TEST 316 


15316: 


TEST THAT ALL COMBINATION OF ‘'TRAP’' WILL CAUSE A TRAP 


lctth: tor. mas Oe tee aeeaer eae aomee eee 


(R2) 
BR45 


#TRAP+376,RB1 


#RA1, 34 


;UPDATE TEST NUMBER 


[SEQUENCE ERROR? 
:BR TO ERROR HALT ON SEG ERROR 


peewee F]] eee ADD +376 TO SHORTEN TEST 
S INITIALIZE BASE Yo ESTE 
[RETURN FROM TRAP TO R 


H 15 , 
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9403 032120 012706 001000 RC1: MOV #BUFF ,SP ;SET UP STACK POINTER " 

9404 032124 104400 RB1: TRAP ; TRAP INST WILL BE MODIFIED TO TRAP+377 

9405 032126 } BR4S: 

9406 032126 012742 000752 MOV #752,-(R2) sMOVE TO MAILBOX # *xxnxee 752) aaeeene 

9407 032132 005242 INC -(R2) 3S5ET MSGTYP TO FATAL ERROR 

9408 032134 000000 HALT sPREVIOUS INST FAILED TO TRAP,OR WRONG $TSTNM 

9409 032136 005267 177762 RAI: INC RB1 s INCREMENT TRAP INSTRUCTION 

9410 032142 022767 104777 177754 CMP #104777,RB1 ; TRAP+377 TO UPPER LIMIT 

9411 032150 103363 BHIS RC1 sHAVE WE TESTED ALL 

9412 032152 012767 000036 145654 MOV 436,34 

5413 032160 005067 145652 CLR 36 

9414 FORO IOI IOI IOIUIIIDIUIIIIOISIOIOIOISIOIIIIIIOIOIOIOIOIUIOIOIIOIIOIOIOIOIOIOIDIOIIOIDIDISIOIOIOIUIOIOIIIIDIOIDIDIOIDICIIUIIOIIOIIOI tot 
9415 = TEST 517 TEST THAT A TRAP OCCURES ON AN “‘IOT'' INSTRUCTION 

9416 inca tl ante... 1 aes Beet eam ee ee 
9417 032164 005212 15317: INC (R2) sUPDATE TEST NUMBER 

9418 032166 022712 000317 CMP #317,(R2) ; SEQUENCE ERROR? 

9419 032172 001006 BNE TS320-10 ‘BR TO ERROR HALT ON SEQ ERROR 

9420 032174 012706 001000 MOV #BUFF ,SP ;STACK POINTER SETUP 

9421 032200 012767 032220 145612 MOV #RETA2 ,RTRAP2 RETURN LOCATION 

9422 032206 000004 IOT [RESERVE INSTRUCTION, SHOULD TRAP 

9423 032210 012742 000753 MOV #753,-(R2) ZMOVE TO MAILBOX # *keeeee 753 Kee R RED 

9424 032214 005242 INC -(R2) 7SET MSGTYP TO FATAL ERROR 

9425 032216 000000 HAL T :10T DIDN'T TRAP,OR WRONG $TSTNM 

9426 032220 RETA2: 

9427 DOOR II IUIIUIIIIIIOIOIOIUIOII III IOIIOIOIOIOIOIOIOIIIOIOIOIOIOIOIOIOIIOIOIIGIOIOIOIOIUIOIOIOIIOIOIOIIO IOI IR I RO i fot 
9428 STEST 320 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 

9429 Sethe Pee IEE ce aaa SET ee ee 
9430 032220 005212 7$320: INC (R2) ;UPDATE TEST NUMBER 

9431 032222 022712 000320 CMP #320, (R2) :SEQUENCE ERROR? 

9432 032226 001011 BNE TS321-10 ;BR TO ERROR HALT ON SEQ ERROR 

9433 032230 012706 001000 MOV #BUFF ,SP :STACK POINTER SETUP 

9434 032234 012767 032244 145556 MOV #RETB2,RTRAP2 ;RETURN POINTER 

9435 032242 000004 IOT sRESERVED INSTRUCTION 

9436 032244 020627 000774 RETB2: CMP SP , ABUF F -4 : TEST DECREMENT OF SP 

9437 032250 001404 BEQ $321 

9438 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <€xszs 
9439 : CONDITIONAL BRANCH INST. AND <zz22 
9440 ; REPLACE THE MOVE INSTRUCTION <==== 

9441 : WHICH FOLLOWS W/ 766 <==== 

9442 032252 012742 000754 MOV #754,-(R2) sMOVE TO MAILBOX # xexxxee 754 keane 

9443 032256 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

3444 032260 000000 HAL T ;NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 

9445 ; : OR SEQUENCE ERROR 

9446 g SSS SESS TROLS SNH CSNSOCRNR HSA SSSHSAN HR NRASASNSeRSTAEHNaREReS AAeRASEReReRSReSEESEHeSS 
9447 ZTEST 321 TEST THAT PROPER P.C. IS SAVED 

9448 is wet eet Ot ee ener teat eae eee 
9449 032262 005212 1$321: INC (R ; UPDATE TEST NUMBER 

9450 032264 022712 000321 CMP #35) (R2) ; SEQUENCE ERROR? 

9451 032270 001012 BNE "8322-10 :BR TO ERROR HALT ON SEQ ERROR 

9452 032272 012706 001000 MOV #BUF 3 STACK POINTER SETUP 

9453 032276 012767 032306 145514 MOV PRETCS RTRAP2 ;RETURN FROM TRAP POINTER 

9454 032304 000004 IOT : TRAP ON THIS INSTRUCTION 

9455 032306 022767 032306 146460 RETC2: CMP #. BUFF H=4 * CHECK FOR INCREMENTED P.C. 

9456 032314 001404 SEQ 75322 

9457 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS — 


9458 : CONDITIONAL BRANCH INST, SND <==== 
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CJKDBB.P17 


032316 
032322 
032324 


032326 


032432 


032434 
032440 
032442 


032444 


032474 


012742 
005242 
000600 


005272 


001404 


012742 


001404 


012742 
005242 
000000 


005212 


100004 


000755 


000322 
001000 


032360 
145422 


146412 


000756 


001000 
032424 
000357 


146346 


000757 


000323 


001000 
032474 
145330 


MACY71 30A(1052) 
1321 


145450 


000000 


145406 
145356 


000357 


145332 


I 15 
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TEST THAT PROPER P.C. IS SAVED 


MOV 
INC 
HALT 


; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 
4755,=(R2) [MOVE TO MAILBOX # «eexeee 755 «eanene 
-(R2) :SET MSGTYP TO FATAL ERROR 
INCORRECT P.C.,0R WRONG $TSTNM 
; OR SEQUENCE ERROR 


< 
< 


SEQ 0190 


“Spillane ghey ppg icin 


TEST 322 


FRR RRR RK RRR KERR EKER EER R EERE EERE ERE EEK 


7$322: 


RETD2: 


RETE2: 


TEST THAT ‘‘OLD'' CC AND PRIORITY ARE PLACED ON STACK 


(R2) :UPDATE TEST NUMBER 
9352 (R2) *SEQUENCE ERROR? 
S323 323-10 ‘BR TO ERROR HALT ON SEQ ERROR 
PRETDS RTRAP2 :SET UP 
CC SCLEAR CC AND PRIORITY 


; TRAP 
ere Ae 3: TEST THAT OLD STATUS WENT TO STACK 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


WHICH FOLLOWS W/ 762 
[MOVE TO MAILBOX # *xexexe 756 xxeeeee 
:SET MSGTYP TO FATAL ERROR 
; INCORRECT STATUS 
SET UP 


#756,-(R2) 
-(R2) 


;SET UP 

:SET PRIORITY 

sSET €C¢ 

7 TRAP 

;COMPARES STATUS ON STACK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 740 
SMOVE TO MAILBOX # *exexee 757 xeanene 
:SET MSGTYP TO FATAL ERROR 
INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
: OR SEQUENCE ERROR 


#BUFF , SP 
AMRETE2,RTRAP2 
#357,CC 


BUF F-24357 
TS323 


#757 ,-(R2) 
-(R2) 


AAAA 


AAAA 


“iui 


g SARS AAAERARAAAAEKHAEN RENE SENAHAAAAAAASAATANAATANANAAHA THER AeRTATeseSNeET EH eNTSHENTS 


TEST 323 


OR IR RRR EKER EEE EKER EKER EKER EERE EERE EERE EEE 


1S323: 


RETF2: 


INC 


TEST THAT ‘NEW’ STATUS IS CORRECT 


(R2) UPDATE TEST NUMBER 

#323, (R2) SEQUENCE ERROR? 

BR46 :BR TO ERROR HALT ON SEQ ERROR 

MBUFF SP 

MRETF2,RTRAP2 

RTRAP2+2 sCLEAR FUTURE PRIORITY AND CC 
TEST FOR ‘'C’* CLEARED 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


1$ 


AAA 


“wou 
wou 


iouuw 


i 
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: WHICH FOLLOWS W/ 766 
032476 012742 000760 #760,-(R2) sMOVE TO MAILBOX # sxaxaee 760 seeneee 
005242 =(R2) SET MSGTYP TO FATAL ERROR 
000000 :N NOT CLEARED 


001004 2$ 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH Pag = eon W/ 761 
012742 000761 #761,-(R2) “MOVE TO MAILBOX aeneaee 761 aeanene 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 :Z NOT CLEARED 


032520 102004 3$ 


iutwu 


AAAA 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 754 
032522 012742 000762 #762,-(R2) MOVE TO MAILBOX # *kxkHKH 762 Kae R KER 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 iV NOT CLEARED 


032532 103004 : 4$ 


AAAA 
tuwu 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 747 
032534 012742 000763 #763,-(R2) “MOVE TO MAILBOX # *xexeee 763 KeKR KER 
-(R2) :SET MSGTYP TO FATAL ERROR 
:C NOT CLEARED 
000340 145224 : $200.08 ; TEST PRIORITY 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 737 
032554 012742 000764 #764,-(R2) sMOVE TO MAILBOX # xxexeee 764 xeennee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
:PRIORITY NOT ZERO 


AAAA 
iuunu 
“iuuu 
nui 
iuuu 


032552 001404 


AAAA 
Wout tt 


itoiuuwuu 
uuu 
tontudu 


001000 5$: #BUFF , SP 

032606 145222 #RETG2,RTRAP2 

000357 145216 A#357,RTRAP2+2 ;SET NEW ‘‘CC’’ AND PRIORITY 
TRAP HERE 


032606 100404 BM 1$ 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
3 REPLACE THE MOVE INSTRUCTION 
; 3 WHICH FOLLOWS W/ 721 
032610 012742 000765 #765,-(R2) sMOVE TO MAILBOX # ‘*«*eexee 765 sxennnee 
005242 -(R2) 7SET MSGTYP TO FATAL ERROR 
000000 iN NOT SET 


032620 001404 2$ 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
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CJKDBB.P11 19=JUN=79 10:52 7323 TEST THAT ‘NEW’ STATUS IS CORRECT SEQ 0192 
9571 3 CONDITIONAL BRANCH INST. AND <s222 
9572 : REPLACE THE MOVE INSTRUCTION <==== 
9573 WHICH Fg ve W/ 714 ¢€s2=5 
9574 032622 012742 000766 MOV #766,-(R2) “MOVE TO MAILBOX kaeekkee 766 wteenee 
9575 032626 005242 INC =-(R2) sSET MSGTYP TO FATAL ERROR 
9576 032630 000000 HALT 32 NOT SET 
9577 032632 e$: 

9578 032632 102404 BVS 3$ 

9579 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
9580 3 CONDITIONAL BRANCH INST. AND  <==== 
9581 : REPLACE THE MOVE INSTRUCTION <==== 
9582 Fy WHICH FOLLOWS W/ 707 <¢=s22 
9583 032634 012742 000767 MOV #767 ,-(R2) sMOVE TO MAILBOX # **%eeee 767 xeeneee 

9584 032640 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 

9585 032642 000000 HALT :V NOT SET 

9586 032644 3$: 

9587 032644 103404 BCS 4$ 

9588 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
9589 Z CONDITIONAL BRANCH INST. AND <==== 
9590 ; REPLACE THE MOVE INSTRUCTION <ss=3 
9591 : WHICH FOLLOWS W/ 702 ¢€s2s2 
9592 032646 012742 000770 MOV #770,-(R2) sMOVE TO MAILBOX # **xxxee 770) xeannen 

9593 032652 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

9594 032654 000000 HALT =C NOT SET 

9595 032656 016796 145114 4$: MOV CC,SP 

9596 032662 042706 000017 Bic #17,SP 

9597 032666 022706 000340 CMP #340,SP 

9598 032672 001404 BEQ BR46A 

9599 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
9600 ; CONDITIONAL BRANCH INST. AND <==== 
9601 : REPLACE THE MOVE INSTRUCTION <==== 
9602 : WHICH FOLLOWS W/ 667 <z==2 
9603 032674 BR46: 

9604 032674 012742 000771 MOV #771,-(R2) MOVE TO MAILBOX # xkexxme 771 keennee 

9605 032700 005242 INC -(P2) ;SET MSGTYP TO FATAL ERROR 

9606 032702 000000 HALT :PRIORITY WAS CHANGED,OR WRONG $TSTNM 

9607 032704 012767 000022 145106 BR46A: MOV #22,20 +2 

9608 032712 005067 145104 CLR 22 SHALT 

9609 DORI IRCCS IIOIIDIOIDIOIUIOISIOIOIOI IOI ITO IOI IIS TOIT OOOO ITO III IIH its 
9610 STEST 324 TEST THAT A TRAP OCCURS ON AN EMT INSTRUCTION 

9611 lg aa acento al eh 
9612 032716 005212 TS324: INC (R2) ;UPDATE TEST NUMBER 

9613 032720 022712 000324 CMP #324, (R2) ; SEQUENCE ERROR? 

9614 032724 001006 BNE TS325-10 ;BR TO ERROR HALT - SEQ ERROR 

9615 032726 012706 001000 MOV #BUFF ,SP :STACK POINTER SETU 

9616 032732 012767 032752 145070 MOV #RETAS,RTRAP3 :RETURN L ATION 

9617 032740 104000 EMT RESERVE” INSTRUCTIOM, SHOULD TRAP 

9618 032742 012742 000772 MOV #772 ,-(R2) *MOVE TO MAILBOX # **%eeKee 772) aeannne 

9619 032746 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

9620 032750 000000 HALT SEMT DIDN'T TRAP,OR WRONG $TSTNM 

9621 032752 RETA3: 

9622 FRR RRR RRR KERR ERE ERE EEERE EERE EERE EREKARER ERE EEE 
9623 STEST 325 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 

9624 CREAR REE ERE ERE ERK EKER ERE EERE REE RRA E RR EEee 
9625 032752 005212 7S325: INC (Re) ;UPDATE TEST NUMBER 


9626 032754 022712 000325 CMP #335, (Re) SEQUENCE ERROR? 
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033010 
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033014 


033050 
033054 
033056 


033120 
033122 


033144 


001011 


001404 


012742 
005242 
000000 


005212 


001404 


012742 
005242 
000000 


005212 


001000 
032776 


000774 


000773 


000326 


001000 
033040 


033040 


000774 


000327 
001000 


033112 
144670 


145660 


000775 


001000 
033156 
000357 
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POINTER ON A TRAP OPERATION SEQ 0193 


BNE TS326=10 :BR TO ERROR HALT ON SEQ ERROR 
MOV #BUFF , SP =STACK POINTER SETUP 
MOV #RETBS,RTRAP3  :RETURN POINTER 
EMT SRESERVED INSTRUCTION 
RETB3: CMP SP, ABUF F =4 = TEST DECREMENT OF SP 
BEQ $326 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
; CONDITIONAL BRANCH INST. AND <=2== 
; REPLACE THE MOVE INSTRUCTION <==== 
: WHICH FOLLOWS W/ 766 <==== 
MOV #773,-(R2) “MOVE TO MAILBOX # xkeexee 773 weneeen 
INC =(R2) :SET MSGTYP TO FATAL ERROR 
HALT [NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
+ OR SEQUENCE ERROR 
DORI IOI ROI IOI SOOO IIIS OI IOI IIIT TOT IT AAAI I SANAAANS ANS NSISIASI AS SISA AIA AINA SAAAAAN AAA AM 
“TEST 326 TEST THAT PROPER P.C. IS SAVED 
Scuien Met's (ener tk. meee ener mane Toe tee ee 
7S326: INC (R2) ;UPDATE TEST NUMBER 
CMP #326, (R2) ; SEQUENCE ERROR? 
BNE 1532710 :BR TO ERROR HALT ON SEQ ERROR 
MOV #BUFF , SP ‘STACK POINTER SETUP 
MOV #RETC3,RTRAP3 =RTURN FROM TRAP POINTER 
EMT STRAP ON THIS INSTRICTION 
RETC3: CMP #. ,BUFF=4 [CHECK FOR INCREMENTED P.C. 
BEQ 1$327 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
; CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
: WHICH FOLLOWS W/ 765 <==== 
MOV #774 ,-(R2) ‘MOVE TO MAILBOX # kxxexxe 774 teeneee 
INC =(R2) ‘SET MSGTYP TO FATAL ERROR 
HAL T Z INCORRECT P.C.,OR WRONG $TSTNM 
: OR SEQUENCE ERROR 
o SRSSASSOSAAAHSERAAS HSH NSH ASS AHATHAAAEHAaAAAANHeSSAAageraggessesseedseseHeseeesssesese 
“TEST 327 TEST THAT ‘‘OLD'' CC AND PRIORITY ARE PLACED ON STACK 
ea ded (SG Cee le eee ERAT ORE ee 
1S327: INC (R2) ;UPDATE TEST NUMBER 
CMP #327, (R2) * SEQUENCE ERROR? 
BNE 1$330-10 [BR TO ERROR HALT ON SEQ ERROR 
MOV #BUFF . SP :SET UP 
MOV #RETD3,RTRAP3  :SET UP 
CLR CC [CLEAR CC AND PRIORITY 
EMT : TRAP 
RETD3: CMP BUFF 2,0 ‘TEST THAT OLD STATUS WENT TO STACK 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
: CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
: WHICH FOLLOWS W/ 762 <==== 
MOV #775,=(R2) [MOVE TO MAILBOX # sxeexae 775 seneeen 
INC ~(R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘INCORRECT STATUS 
1$: MOV #RUFF SP :SET UP 
MOV WRETES,RTRAP3 SET UP 
MOV #357,(¢ ‘SET PRIORITY 
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104000 
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012742 
005242 
000000 
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100004 


012742 


001004 


012742 


103004 


012742 


145614 000357 RETE3: 


000776 


000330 
001000 


033226 


144606 


000777 


001000 


001001 


001002 
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SCC 
EMT 
CMP 
BEQ 


MOV 
INC 
HALT 
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THAT "‘OLD'' CC AND PRIORITY ARE PLACED ON STACK 

SET CC 

COMPARES STATUS ON 

TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 


REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 740 


BUF F=2 ,4357 
TS330 


#776,~(R2) 
-(R2) 


. 
e 


INCORRECT STATUS ON STACK,OR WRONG $TSTNM 


“MOVE TO MAILBOX #4 
:SET MSGTYP TO FATAL 


OR SEQUENCE ERROR 


STACK 


KRKKKKKK 


ERROR 


776 


REKEKKKK 


“iunuu 
nu 
iunu 


SEQ 0194 


° 
g NORA SS TARA THANG AA SANSONE SSS HAAS HAAAAAA SANSA SANA aseTaaaaeeanegeasaresesaneseesgsants 


TEST 330 


75330: 


RETF3: 


2$: 


3$: 


MOV 


TEST THAT ‘NEW’ STATUS IS CORRECT 


g RAARKERRERARERERREEARERRERRERERARARAAAAAAAAAAERRAAARRAEREREREREREERERRREREREERERT RD 


(Re) 
#330, (R2) 
TS331-10 


#BUFF , SP 
AMRETF3,RTRAP3 
RTRAP3+2 


1$ 


#777 ,-(R2) 
=(h2) 


2$ 


#1000,-(R2) 
-(R2) 


3$ 


#1001,=(R2) 
-(R2) 


4$ 


#1002,-(R2) 


UPDATE TEST NUMBER 


TSEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


:CLEAR FUTURE PRIORITY AND CC 


3 TEST FOR ‘'C’’ CLEARE 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL “BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 


“MOVE TO MAILBOX # 
:SET MSGTYP TO FATAL 


:C NOT CLEARED 


a 


TO SCOPE: fhcnr? THE RIGHT BYTE OF THIS 


D 


KEKKKKEK 


ERROR 


777 


ITIONAL BRANCH IN 


ST. 
REPLACE THE MOVE INSTRUCTION 


: WHICH FOLLOWS W/ 761 
:MOVE TO MAILBOX # 

:SET MSGTYP TO FATAL 
:Z NOT CLEARED 


KKKKKKK 


ERROR 


1000 


RRKKKKK 


AND 


KKKKKKE 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 754 


“MOVE TO MAILBOX # 
;SET MSGTYP TO FATAL 


:V NOT CLEARED 


REKKKKE 


ERROR 


1001 


KEKE 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
ey THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 747 

:MOVE TO MAILBOX # 


Rekkhane 


1002 


Reekhek 


AAAA 


nude 
“uuu 
Te 


AAAA 
nunu 
Huu Huey 
Venu 
uuu 


AAAA 
Huu 
nun 
“uuu 
uuu 


“nud 
nom i 
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033272 005242 INC -(R2) SET MSGTYP TO FATAL ERROR 
000000 HALT :C_NOT CLEARED 
032767 000340 144472 4$: ae +t ae TEST PRIORITY 


001404 
:; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MCVE INSTRUCTION 
WHICH FOLLOWS W/ 737 
012742 001003 #1003,=-(R2) [MOVE TO MAILBOX # xexxexe 1003 seeeeee 
-(R2) :SET MSGTYP TO FATAL ERROR 
:PRIORITY NOT ZERO 


AAAA 
ionnenu 
fun wu 


001000 5$: 

033340 144500 #RETG3,RTRAP3 

600357 144474 #357,RTRAP3+2 = SET NEW ‘'CC’’ AND PRIORITY 
TRAP HERE 


. 
. 


100404 1$ 
; TO SCOPE: CLEAR THE RIGHT BYTE CF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 721 
012742 001004 #1004 ,-(R2) [MOVE TO MAILBOX # teens 
005242 ~(R2) :SET MSGTYP TO FATAL ERROR 
000000 :N NOT SET 


033352 001404 2$ 


AAAA 
uuu 


; TO SCOPE: CLEAR THE RIGHT BYTE = THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 714 
033354 012742 001005 #1005,-(R2) “MOVE TG MAILBOX # xe 1005) eeeeKee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 32 NOT SET 


102404 3$ 


AAAA 
nunwu 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 707 
012742 001006 #1006,-(R2) [MOVE TO MAILBOX # texexee 1006 xeexees 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :V NOT SET 


103404 : 4$ 


AAAA 
“wou ou 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
E WHICH FOLLOWS W/ 702 
012742 001007 #1007,=(R2) “MOVE TO MAILBOX # Ssasaes 1007 seeeeen 
0 ~(R2) SET MSGTYP TO FATAL ERROR 
:C NOT 


AAAA 
ww 
“wueuu 
woud 


Moun u 


4$: 
000340 144356 #340,CC 
033420 001404 S334 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
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012742 
005242 
000000 


005212 
022712 
001011 


012767 


104000 
012742 
005242 
000000 
005267 
022767 
103363 


012767 
005067 


020627 
001404 


012742 


001010 


000331, 


104376 
033474 
001000 


001017 


177762 
104377 


000032 
144310 


000332 


001000 
033556 


001012 


000333 


001000 
033602 


000774 


001013 
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000012 
144352 


177754 


144312 


144250 


144214 


TEST THAT ‘NEW'’ STATUS IS CORRECT SEQ 0196 
; REPLACE THE MOVE INSTRUCTION <==== 
WHICH FOLLOWS W/ 671 <=2== 
MOV #1010,-(R2) [MOVE TO MAILBOX # xeexeee 1010 senenne 
INC -(R2) ;SET MSGTYP TO FATAL ERROR 
HALT :PRIORITY WAS CHANGED,OR WRONG $7STNM 


; OR SEQUENCE ERROR 


FRR RRR RRR RRR RE KERR EEE RKTT 


“TEST 331 TEST THAT ALL COMBINATION OF EMT WILL CAUSE A TRAP 
ReRGE Geet ot aeaes oS rn ade dee eee ee eae eee nae 
7S331: INC (R2) ;UPDATE TEST NUMBER 
CMP #331, (R2) : SEQUENCE ERROR? 
BNE BR47 :BR TO ERROR HALT ON SEQ ERROR 
peeee —]] xee® ADD +376 TO SHORTEN TEST 
MOV #EMT+376,RB s INITIALIZE BASE EMT INSTRUCTION 
MOV #RA, 30 :RETURN FROM TRAP TO RA 
RC: MOV #BUFF , SP [SET UP STACK POINTER 
RB: EMT [TRAP INST. WILL BE MODIFIED TO EMT+377 
MOV #1011,=(R2) :MOVE TO MAILBOX # *eexeee 1011 xeenene 
INC =(R2) :SET MSGTYP TO FATAL ERROR 
HALT sPREVIOUS INST FAILED TO TRAP,OR WRONG $TSTNM 
RA: INC RB : INCREMENT TRAP INSTRUCTION 
CMP #104377,RB ZEMT+377 TO EMT 
BHIS RC : HAVE WE TESTED "al 
MOV #32,30 s/.+ 
CLR 32 SHALT 
UO IE OEE IISIIIO SIG IISIIISIOIUIIIOIIISIIOOIIISOIOIIUII OIE SU Onn iiiennes 
STEST 332 TEST THAT A TRAP OCCURES ON AN ‘‘TRACE-TRT’’ INSTRUCTION 
SEERA REAR ER REE R ERK EEREKEEKEEEREEEEEER ERENT REED 
7S332: INC (R2) ZUPDATE TEST NUMBER 
CMP 9332 (R2) : SEQUENCE ERROR? 
BNE 1$333-10 :BR TO ERROR HALT ON SEQ ERROR 
MOV #BUFF ,SP STACK POINTER SETUP 
MOV oak Tag RTRAPS SRETURN LOCATION 
TRT sRESERVED INSTRUCTION, SHOULD TRAP 
MOV #1012,-(R2) [MOVE TO MAILBOX # kexxxxe 1012 eaewnes 
INC -(R2) :SET MSGTYP TO FATAL ERROR 
ae ing :TRT DIDN'T TRAP,OR WRONG $TSTNM 
FR RRR EERE KEKE KK ERK KEE KEE EERE KERR KEKE REE 
“TEST 333 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 
eu tee eaten <a amey nemem ee ee ee eer ae 
1S333: INC (R2) ;UPDATE TEST NUMBER 
CMP #333, (R2) s SEQUENCE ERROR? 
BNE TS334-10 ‘BR TO ERROR HALT ON SEQ ERROR 
MOV ABUFF . SP :STACK POINTER SETUP 
MOV §- #RETB4,RTRAP4 RETURN POINTER 
TRT :RESERVED INSTRUCTION 
RETB4: CMP SP, ABUF F -4 :TEST DECREMENT OF SP 
BEQ 7S 334 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS (SSS 
CONDITICNAL BRANCH INST. AND <==== 
REPLACE THE MOVE INSTRUCT ION <==== 
WHICH FOLLOWS W/ / 766 <szs2 
MOVE TO MAILBOX # sxeeeneee 10135 wxeneee 


MOV #1013,-(R2) 


C okt 
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033614 005242 INC -(R2) zSET MSGTYP TO FATAL ERROR 
033616 000000 HALT ;NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
> OR SEQUENCE ERROR 
FERRER RERREE ERE EE ERE EEEKEKEEEEEEKEEREEE EEE 
STEST 334 TEST THAT PROPER P.C. IS SAVED 
ete! tars. > Seek cn eee Saee pe mme eS e ne eeer eey 
005212 15334: (R2) ;UPDATE TEST NUMBER 
000334 C #334 (R2) : SEQUENCE ERROR? 
$335- ~19 “BR TO ERROR HALT ON SEQ ERROR 
001000 rau FF, :STACK POINTER SETUP 
033644 144152 PRETCE RTRAPS [RETURN FROM TRAP POINTER 
T STRAP ON THIS INSTRUCTION 
033644 145122 RETC4: #. ,BUFF=4 ‘CHECK FOR INCREMENTED P.C. 


001404 TS335 
\ ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 765 
012742 001014 #1014,=(R2) [MOVE TO MAILBOX # «xeeeee 1014 weneene 
=(R2) ‘SET MSGTYP TO FATAL ERROR 
: INCORRECT P.C.,0R WRONG $TSTNM 
: OR SEQUENCE ERROR 
png asi odi caghnlerig be nshage- danke giaanbochlschiaaia cian latte dads ileal 
STEST 335 TEST THAT ‘‘OLD'' CC AND PRIORITY ARE PLACED ON STACK 
Sah inet i Geek HT cot MAE WO tA ae ee 
1S335: (R2) ;UPDATE TEST NUMBER 
000335 #335, (R2) s SEQUENCE ERROR? 
TS336-10 ;BR TO ERROR HALT ON SEQ ERROR 
001000 #BUFF ,SP SSET UP 
033716 144106 WRETD4.RTRAP4  :SET UP 
144064 CC [CLEAR CC AND PRIORITY 


00003 T 3 TRAP 
033716 026727 145054 000000 : BUF F=2 ,40 : TEST THAT OLD STATUS WENT TO STACK 


TEST FOR ALi ZEROS 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 762 
033726 012742 001015 #1015,-(R2) “MOVE TO MAILBOX # *keeeHe 1015 keene 
-(R2) SET MSGTYP TO FATAL ERROR 

* INCORRECT STATUS 

001000 : #BUFF ,SP sSET UP 

033762 144044 #RETES,RTRAPS :SET UP 

000357 144020 #357,CC :SET PRIORITY 
sSET-SET CC 


T 7 TRAP 
145010 000357 : s ld : COMPARES STATUS ON STACK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 740 
033772 #1016,=(R2) -MOVE TO MAILBOX # *texeee 1016 eeeenee 
033776 52 -(R2) ;SET MSGTYP TO FATAL ERROR 


033724 001404 1$ 


033770 


| 
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8 
CJKDBB.P11 19=JUN=79 10:52 7335 TEST THAT “‘OLD’’ CC AND PRIORITY ARE PLACED ON STACK SEQ 0198 
9907 034000 000000 HALT ; INCORRECT STATUS om STACK,OR WRONG $TSTNM 
9908 ; OR SEQUENCE ERRO 
9909 juesnenenusnenseneneeseuessanencnenneueneerstenneerseenensestequeseenennesaceeeacees 
9910 STEST 336 TEST THAT ‘NEW’ STATUS IS CORRECT 
9913 FT ITT TTT TTT RT RT RT TR REE ETE REE ER EERE ERE RRR RE RE RE EE 
9912 034002 005212 7S336: INC (R2) ;UPDATE TEST NUMBER 
9913 034 022712 000336 CMP #336,(R2) ; SEQUENCE ERROR? 
9914 034010 001710 BNE BR51 ‘BR TO ERROR HALT ON SEQ ERROR 
9915 034012 012°06 001000 MOV BUFF SP 
9916 034016 012767 034032 143770 MOV MRETF4,RTRAPS 
9917 034024 005067 143766 CLR RTRAP4+2 CLEAR FUTURE PRIORITY AND CC 
9918 034030 000003 TRT 
1 034032 RETF4: ; TEST FOR ‘'C'’ CLEARED 
9920 034032 100004 BPL 1$ 
9921 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢zz=2 
9922 é CONDITIONAL BRANCH INST. AND ¢€==== 
9923 : REPLACE THE MOVE INSTRUCTION <==== 
9924 WHICH FOLLOWS W/ 766 <==== 
9925 034034 012742 001017 MOV #1017,=-(R2) SMOVE TO MAILBOX # xxexeee 1017 keawnnn 
9926 034040 005242 INC -(R2) zSET MSGTYP TO FATAL ERROR 
9927 034042 000000 HALT iC NOT CLEARED 
9928 034044 1$: 
9929 034044 001004 BNE 2$ 
9930 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢€=ss= 
9931 é CONDITIONAL BRANCH INST. AND ¢€z=22 
9932 : REPLACE THE MOVE INSTRUCTION <==== 
9933 WHICH FOLLOWS W/ 761 <==== 
9934 034046 012742 001020 MOV #1020,-(R2) [MOVE TO MAILBOX # *xexeee 81020 xeeenne 
9935 034052 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
9936 034054 000000 HALT 32 NOT CLEARED 
9937 034056 2$: 
9938 034056 102004 BYC 3$ 
9939 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢€z=2zz 
9940 : CONDITIONAL BRANCH INST. AND <==== 
9941 : REPLACE THE MOVE INSTRUCTION <==== 
9942 WHICH FOLLOWS W/ 754 <=s=2 
9943 034060 012742 001021 MOV #1021,-(R2) [MOVE TO MAILBOX # *xxxxee 1021 xeeneee 
9944 034064 005242 INC -(R2) 7SET MSGTYP TO FATAL ERROR 
9945 034066 000000 HALT iV NOT CLEARED 
9946 034070 3$: 
9947 034070 103004 BCC 4% 
9948 : TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <=zz= 
9949 Z CONDITIONAL BRANCH INST. AND ¢zs22 
9950 : REPLACE THE MOVE INSTRUCTION <==== 
9951 : WHICH FOLLOWS W/ 747 <zzzz 
9952 034072 012742 001022 MOV #1022,-(R2) sMOVE TO MAILBOX # *xexxxexe 1022 xeenene 
9953 034076 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
9954 034100 000000 HALT :C NOT CLEARED 
9955 034102 032767 000340 143666 4$: BIT #540,CC sTEST PRIORITY 
9956 034110 001404 BEQ 5$ 
9957 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ¢===5 
9958 z CONDITIONAL BRANCH INST. AND <==2== 
9959 : REPLACE THE MOVE INSTRUCTION <==== 
9960 ; CH FOLLOWS W/ 737 <zzz2 
9961 034112 012742 001023 MOV #1023,-(R2) sMOVE TO MAILBOX weeeeete 1025 wxeenne 
9962 054116 005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 
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034120 00000 HALT sPRIORITY NOT ZERO 
001000 5$: MOV #BUFF SP 
034144 MOV AMRETGS ,RTRAPS 
000357 MOV #357,RTRAP4+2 ;SET NEW ‘'CC’* AND PRIORITY 
; TRAP HERE 


100404 BM 1$ 
; TO SCOPE: ap THE RIGHT BYTE OF THIS 
; ONDITIONAL BRANCH INST. AND 
REPLACE THE re 5 Neate 


034146 012742 001024 #1024,=(R2) “MOVE TO MAILBOX aaneees 
034152 005242 -(R2) :SET MSGTYP TO FATAL ERROR 

034154 000000 :N NOT SET 

034156 : 

034156 001404 2$ 


AAAA 


inuu 
wen 
iouueu 
iui 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
i WHICH FOLLOWS W/ 7 
012742 001025 #1025,-(R2) “MOVE TO MAILBOX 4 *xxewe® hk ek eee 
005242 -(R2) zSET MSGTYP TO FATAL ERROR 
000000 32 NOT SET 


102404 3$ 


hun u 


; TO SCOPE: tier THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE Ayr INSTRUCTION 


012742 001026 #1026,-(R2) :MOVE TO MAILBO 1026 xxeKeee 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 *V NOT SET 


103404 4$ 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 

. é WHICH FULLOWS W/ 702 
012742 001027 MO #1027,-(R2) sMOVE TO MAILBOX # *xexeee 1027 exeaenne 
-(R2) 5 gpg hy TO FATAL ERROR 

:C N 


143556 

000017 

000340 

001404 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
BRST WHICH FOLLOWS W/ 667 


012742 MO #1030,-(R2) sMOVE TO MAILBOX # «xeewee 1030 xanenee 
=(R2) 7SET MSGTYP TO FATAL ERROR 
zPRIORITY WAS CHANGED ,OR WRONG $TSTNM 


AAAA 
fowuu 


“wou 
oi ut ti 
mou i 


H 
143544 BRSIA: #16,14 
CL 16 


034250 005067 
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CJKDBB.P11 19=JUN=79 10:52 1336 TEST THAT ‘NEW’ STATUS IS CORRECT SEQ 0200 


3PDP=11 ILLEGAL AND ar aid © ic" TEST 
ZALL INSTRUCTIONS THAT ARE RESERVED 

SHOULD TRAP 1) LOCATION 4, AND tH HE 

:PC THAT POINTS TO THE TRAPPING INSTRUCTION 
> SHOULD BE PLACED ON THE STACK 


SERRATE REAR EERE ERE EERE EEA EERE ERE EERE EERE EEE ED 
STEST 337 TEST THAT A TRAP OCCURS ON AN ILLEGAL INSTRUCTION 
coat. tee: Ook cas |) Ae Tae ia ote oe ree ee ee 
005212 1S337: (R2) ;UPDATE TEST NUMBER 
000337 #337, (R2) : SEQUENCE ERROR? 
TS340-10 ‘BR TO ERROR HALT ON SEQ ERROR 
001000 #BUFF SP :STACK POINTER SETUP 
034310 143506 ARETAS,RTRAPS RETURN LOCATION 
%0 ZILLEGAL INSTRUCTION, SHOULT TRAP 
001031 #1031,-(R2) [MOVE TO MAILBOX # kexeeee 103] xeeneee 
=(R2) ‘SET MSGTYP TO FATAL ERROR 
000000 RETAS: i‘. s ILLEGAL INSTRUCTION DIDN'T TRAP,OR WRONG $TSTNM 
DERE REE RRR RRR KERR EKER EEE EERE REE REE REE EERE REE 
“TEST 340 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 
ima. ie: 2a | 1c ls er CORT CLUE Ee ee ee 
005212 ; 7S340: (R2) :UPDATE TEST NUMBER 
000340 #340, (R2) SSEQUENCE ERROR? 
7S341-10 [BR TO ERROR HALT ON SEQ ERROR 
001000 #BUFF SP :STACK POINTER SETUP 
034334 143452 #RETBS,RTRAPS =RETURN POINTER 
J %0 SRESERVED INSTRUCTION 
000774 TBS: SP . BUFF ~4 :TEST DECREMENT OF SF 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 
034342 012742 001032 #1032,-(R2) “MOVE TO MAILBOX # saeeexx 1032 seesees 
005242 =(R2) :SET MSGTYP TO FATAL ERROR 
000000 “NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
: OR SEQUENCE ERROR 
PRERER EERE ERNE CE ERE EERE ERE ER RR RE RRR EEE RARER RRR REE EER ERE ee eRe e ee eeEe 
“TEST 341 TEST THAT PROPER P.C. IS SAVED 
he tet  cuest oe cies ee TERE CEE eo ee eee 
005212 1S341: (R2) ;UPDATE TEST NUMBER 
000341 CMP #341, (R2) :SEQUENCE ERROR? 
7$342-10 :BR TO ERROR HALT ON SEQ ERROR 
001000 #BUFF SP ‘STACK POINTER SETUP 
034376 143410 mRETCE. RTRAPS :RETURN FROM TRAP POINTER 
J %0 STRAP ON THIS INSTRUCTION 
034376 144370 RETCS: #. ,BUFF-4 [CHECK FOR INCREMENTED P.C. 


1§342 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 765 
012742 001033 #1033,-(R2) “MOVE TO MAILBOX # weeneee 19335 xxnenene 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 > INCORRECT P.C.,0R WRONG $TSTNM 


034340 001404 


AAAA 
“oueou i 
“nuinu 


Woe at 





G 16 
CJKDB=B DCF11=AA CPU_DIAG MACY11 30A(1052) 19=JUN=79 11:08 PAGE 201 
CJKDBB.P11 19=JUN=79 10:52 1341 TEST THAT PROPER P.C. IS SAVED SEQ 0201 


; OR SEQUENCE ERROR 


Sa ached dpi alent dcp ecient 


STEST 342 TEST THAT ‘‘OLD'' CC AND PRIORITY ARE PLACED ON STACK 
weit eee eee eee eee RRR RR RR RRRRERSASESESSSSLSS SSE S ESE SELES CESSES ESS SSS SSL S SSCS eC See ee eT 
005212 $342: (R2) ZUPDATE TEST NUMBER 
000342 C #342, (R2) : SEQUENCE ERROR? 
- 1$343-10 :BR TO ERROR HALT ON SEQ ERROR 
001000 #BUF *SET UP 
034450 163344 PRE TDS RTRAPS 7SET UP 
143332 CC =CLEAR CC AND PRIORITY 


J %0 ; TRAP 
144322 000000 : ; ar rneeae ; TEST THAT OLD STATUS WENT TO STACK 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
; REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 762 
012742 001034 #1034,-(R2) “MOVE TO MAILBOX # *eeeeee 1034 eennwee 
-(R2) 7SET MSGTYP TO FATAL ERROR 
INCORRECT STATUS 
sSET UP 


001404 


“wun i 


001000 : A#BUFF , SP 
034514 143302 AMRETES,RTRAPS ;SET UP 
000357 143266 #357,CC ‘er ate 


J x0 * TRAP 
144256 000357 : o BUFF 2.4357 =COMPARES STATUS ON STACK 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
oe FOLLOWS W/ 740 
012742 001035 #1035,-(R2) “MOVE TO MAILBOX aeaeeee 1055 seeenne 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 > INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
; OR SEQUENCE ERROR 
JUEEEIEIEICIUSIIIEIEEIIEIEIEIUOUIIIEISISIIIDIEIUIOUUIOIOOTIDICIIIOUTIOIOIOCUTOIEUIUEUOUIEIUIOOUDEDOE Onin nti 
ZTEST 343 TEST THAT ‘NEW’' STATUS IS CORRECT 
gr gue mae ea cette een en tlc ancl ie. ent Cnn, 
005212 7$343: (R2) ; UPDATE TEST NUMBER 
000343 C #343, (R2) > SEQUENCE ERROR? 
001000 TS344-10 ;BR TO ERROR HALT ON SEQ ERROR 


#BUFF ,SP 
034564 143226 AMRETFS ,RTRAPS 
14.3224 wre :CLEAR FUTURE PRIORITY AND CC 


:TEST FOR *'C** CLEARED 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
; WHICH FOLLOWS W/ 766 
012742 001036 #1036,-(R2) -MOVE TO MAILBOX # xxexeen 1036 xeenene 
005242 -(R2) 7SET MSGTYP TO FATAL ERROR 
000000 :C NOT CLEARED 


001404 


— SS oe) a J 8 
SOOCO0CO000 
—_ et nt so 2 ot es 


000100 
100004 : 1$ 


NAAA 
wou ut 
woe a 


“uw 
newu 
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CJKDBB.P11 19=JUN=79 10:52 7343 TEST THAT ‘NEW’’ STATUS IS CORRECT SEQ 0202 
10131 034576 001004 BNE 2$ 

10132 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10133 i CONDITIONAL BRANCH INST. AND <==== 
10134 : REPLACE THE MOVE INSTRUCTION <==== 
10135 WHICH FOLLOWS W/ 761 (ese 
10136 034600 012742 001037 MOV #1037,=-(R2) :MOVE TO MAILBOX # x*eeeee 1057 xannnee 

10137 034604 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

106138 034606 000000 HALT 32 NOT CLEARED 

10139 034610 2$: 

10140 034610 102004 BYC 3$ 

10141 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10142 i CONDITIONAL BRANCH INST. AND <==== 
1014 ; REPLACE THE MOVE INSTRUCTION <==== 
10144 WHICH FOLLOWS W/ 754 <=2== 
10145 034612 012742 001040 MOV #1040,=(R2) =MOVE TO MAILBOX # xxeeeee 1040 eeeenee 

10146 034616 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

10147 034620 000000 HALT iV NOT CLEARED 

10148 034622 3$: 

10149 034622 103004 BCC 4$ 

10150 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10151 3 CONDITIONAL BRANCH INST. AND <==== 
10152 j REPLACE THE MOVE INSTRUCTION <==== 
10153 , WHICH FOLLOWS W/ 747 <===2 
10154 034624 012742 001041 MOV #1041,-(R2) sMOVE TO MAILBOX # **eexee 81041 xeeenne 

10155 034630 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

10156 034632 000000 HALT :C NOT CLEARED 

10157 034634 032767 000357 143134 4$: BIT #357,CC ;TEST PRIORITY 

10158 034642 001404 BEQ 5$ 

10159 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10160 Z CONDITIONAL BRANCH INST. AND <==== 
10161 : REPLACE THE MOVE INSTRUCTION <==== 
10162 : WHICH FOLLOWS W/ 737 <z=22 
101635 034644 012742 001042 MOV #1042,-(R2) zMOVE TO MAILBOX # *xeexee 1042 kennnee 

10164 034650 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

10165 034652 000000 HALT =PRIORITY NOT ZERO 

10166 034654 012706 001000 5$: MOV #BUFF SP 

10167 034660 012767 034676 143116 MOV #RETGS,RTRAPS 

10168 034666 012767 000357 143172 MOV #357,RTRAPS+2 ;SET NEW ‘'CC'’ AND PRIORITY 

10169 034674 000100 JMP 40 : TRAP HERE 

10170 034676 RETGS: 

10171 034676 100404 BM] 1$ 

10172 : TO SCOPE: poe THE RIGHT BYTE OF THIS <==2=2 
10173 F CONDITIONAL BRANCH INST. AND <2222 
10174 : REPLACE THE MOVE INSTRUCTION <==== 
10175 WD OM FOLLOWS W/ 721 <==== 
10176 034700 012742 001043 MOV #1043,-(R2) “MOVE TO MAILBOX aeeneee 1043 weaeene 

10177 034704 005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 

10178 034706 000000 HALT ‘N NOT SET 

10179 034710 1$: 

10180 034710 001404 BEQ 2$ 

10181 2 TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10182 * CONDITIONAL BRANCH INST. AND  <==== 
10183 : REPLACE THE MOVE PS TAR TION ¢€xz22 
10184 : oe FOLLOWS W/ 714 <zss2 
10185 034712 012742 001044 MOV #1044,-(R2) sMOVE TO MAILBOX weeeeee 1044 seeeene 

10186 034716 005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 


CJKDB=8 DCF11=AA CPU_DIAG. 
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038004 


035024 


035050 
035054 


19=JUN=79 10:52 


000000 
102404 


012742 
005242 
000000 


103404 
012742 
001404 


012742 
005242 
000000 


005212 
022712 
001006 
000000 


005212 


001404 


001045 


001046 


143024 
000357 


001047 


600344 


001000 
035024 


001050 


000345 


001000 
035050 


000774 
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142772 


142736 


HALT 
2$: 
BVS 3$ 
MOV #1045,=(R2) 
INC -(R2) 
HALT 
3$: 
BCS 4$ 
MOV #1046,-(R2) 
INC -(R2) 
HALT 
43: MOV CC,SP 
CMP #357,SP 
BEQ T8344 


MOV #1047,-(R2) 
-(R2) 


:Z NOT SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <= 
CONDITIONAL BRANCH INST. AND <= 
REPLACE THE MOVE INSTRUCTION <= 
WHICH FOLLOWS W/ 707 <= 
“MOVE TO MAILBOX # xteaxee 1045 ctnnnne 
;SET MSGTYP TO FATAL ERROR 


:V NOT SET 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <€az 
CONDITIONAL BRANCH INST. AND <=2 
REPLACE THE “ye INSTRUCTION <== 
WHICH FOLLOWS W/ 702 €azsz 
“MOVE TO MAILBOX # xxxweee 1046 xaekn ee 
iF pep aay TO FATAL ERROR 


iC N 


’ 
. 


[MOVE TO MAILBOX # *xeexee 1047 teewne 


; TO SCOPE: eas THE RIGHT BYTE OF THIS 


DITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 671 


nou ou 
fou tu 
inuwu 
Woueon uy 


AAAA 


:SET MSGTYP TO FATAL ERROR 
sPRIORITY WAS CHANGED,OR WRONG $TSTNM 


OR SEQUENCE ERROR 


FI eR FTC TTR TORT TTT TTI TT TOTTI TOTTI TREE EEE REE EER ERK KEKE EEE Ee 


TEST 344 TEST THAT A TRAP OCCURES ON ALL ILLEGAL INSTRUCION 


eee tees ote gee acon eee an memees  O  e ee 


75344: INC (R2) 

CMP #344, (R2) 
TS345-10 
#BUFF ,SP 

MOV ad peat 
Ve 

MOV #1050,-(R2) 
(Re) 


LT 
RETHS: 


;UPDATE TEST NUMBER 

; SEQUENCE ERROR? 

[BR TO ERROR HALT ON SEQ ERROR 

:STACK POINTER SETUP 

RETURN LOCATION 

;RESERVED INSTRUCTION, SHOULD TRAP 

‘MOVE TO MAILBOX # <«xx%xxxe 7050 xaxnnee 
:SET MSGTYP TO FATAL ERROR 


:DIDN'T TRAP,OR WRONG $TSTNM 


DORRIT TT RT I TT RIK I RRR KEE RRR RRR KEE EER EEE EERE REE RRR E ED 


TEST 345 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 


DO I I TR RRR RRR ERE REE RRE RRR E RE REERER ERE EERE ERR 


15345: INC (R2) 
CMP 4345, (R2) 
BNE 7S346-10 
MOV #BUFF , SP 
MOV #RETJ.RTRAPS 
JSR : 

RETJ: CMP SP. ABUF F =4 
BEQ TS 346 


UPDATE TEST NUMBER 


SEQUENCE ERROR? 


BR TO ERROR HALT ON SEQ ERROR 
STACK POINTER SETUP 

;RETURN POINTER 

RESERVED INSTRUCTION 


:TEST DECREMENT OF SP 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <=== 
CONDITIONAL BRANCH INST. AND <== 


SEQ 0203 
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035056 
035062 


035120 


035122 
035126 
035150 


035132 


035172 


035174 
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012742 
005242 
000000 


005212 


012742 
005242 
000000 


005212 
022712 


000 
026727 
001404 


001051 


000346 


001000 
035112 


035112 


001052 


000347 


001000 
035164 
142616 


143606 


001053 


001000 
035230 
000357 


143542 
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142674 
143654 


142630 


000000 
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TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 


: REPLACE THE MOVE INSTRUCTION < 
; WHICH FOLLOWS W/ 766 < 
sMOVE TO MAILBOX #4 


SEQ 0204 


MOV #1057,=(R2) kerkene 105] waeanne 
INC -(R2) ;SET MSGTYP TO FATAL ERROR 
HALT sNOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
; OR SEQUENCE ERROR 
DOIOIIOIOIIOIDIOIOIOIIOIDIISIOIIOIIIOIOISIOIOIOIUIOIOIUIDIIUIOIOIOIIOIOOIDIOIDIDIOIDIDIDIDIIDIDIIUIIOIUIIOIOIDIIIUIIUI nnn tt nnes 
TEST 346 TEST THAT PROPER P.C. IS SAVED 
TTI SITE IITITI LIST TITS TTITETITITTT TTT TT ETT TT TTT TTT TTT TT TTTT TTT TTT TTT TTT TTT TTT TTT 
15346: INC (R2) ;UPDATE TEST NUMBER 
CMP #346, (R2) = SEQUENCE ERROR? 
BNE 7S8347=10 TO ERROR HALT ON SEQ ERROR 
MOV ABUFF SP “STACK POINTER SETUP 
MOV MRETK,RTRAPS RETURN FROM TRAP POINTER 
INSTK JSR 0,%0 ; TRAP ON THIS INSTRUCTION 
RETK: CMP #INSTK+2,BUFF <4 + CHECK FOR INCREMENED P.C. 
BEQ TS347 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
Fs CONDITIONAL BRANCH INST. AND ¢€s22= 
: REPLACE THE MOVE INSTRUCTION <==== 
s WHICH FOLLOWS W/ 765 <==== 
MOV #1052,=(R2) sMOVE TO MAILBOX # xxeeawe 1052 euenene 
INC -(R2) 7SET MSGTYP TO FATAL ERROR 
HALT INCORRECT P.C.,0OR WRONG $TSTNM 


OR SEQUENCE ERROR 


FREER RRR RRR REE EERE REE EKER EEE ERE ERE EEO 


TEST 347 TEST THAT "‘OLD’' CC AND PRIORITY ARE PLACED ON STACK 


SRR RRR ERR EERE EERE EERE RRR KERR REE REE REET ERERR ERE EERE KE EERE EERE RE 


TS347: INC (R2) | ;UPDATE TEST NUMBER 
CMP #347, (R2) SEQUENCE ERROR? 
BNE TS350-10 BR TO ERROR HALT ON SEQ ERROR 
MOV #BUFF ,SP 3 SET 
MOV #RETL .RTRAPS SET U 
on CC LEAR CC AND PRIORITY 
JSR %0,2%0 ; TRAP 
RETL: a eae TEST THAT OLD STATUS WENT TO STACK 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
: CONDITIONAL BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 
: WHICH FOLLOWS W/ 762 <=s=5 
MOV #1053,-(R2) sMOVE TO MAILBOX # **xeewe 1053 xeeenes 
INC ~(R2) :SET MSGTYP TO FATAL ERROR 
HALT : INCORRCT STATUS 
1$: MOV BUFF ,SP 7SET UP 
MOV #RETM,RTRAPS SET UP 
MOV #357 ,CC 3SET PRIORITY 
SCC + 4 
JSR %0,%0 7 TRAP 
RETM: ¢ BUFF =2, #357 COMPARES STATUS ON STACK 
BEQ TS350 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST, AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 


CJKDB-B pli CPU_DIAG. 
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035240 
035244 
035246 


035250 


035312 


035314 


035324 


035326 


035354 


012742 
242 


012742 
005242 
000000 


102004 


012742 
005242 
000000 


103004 


012742 


001404 


0u1054 


000350 


001000 
035300 
142510 


001055 


001056 


001057 


001060 


142422 
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142512 
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TEST THAT “‘OLD'’ CC AND PRIORITY ARE PLACED ON STACK 


MOV 
INC 
HALT 


nit Ea eg 


=(R2 


: WHICH FOLLOWS W/ 740 
[MOVE TO MAILBOX # *xenexe 1054 seanene 
[SET MSGTYP TO FATAL ERROR 


: INCORRECT STATUS ON STACK,OR WRONG $TSTNM 


; OR SEQUENCE ERROR 


¢€s= 


SEQ 020 


Fe See EONS SARS ASH SSSH STH AHNSAHAASA AANA AH AANA HAAN SAS SAS SNA ssAsNgeeENeeNeesse 


TEST 350 


7$350: 


RETN: 


1$: 


2$: 


3$: 


S$: 


TEST THAT “NEW'' STATUS IS CORRECT 


in ie: ek Ste tS ee TOME tea ee eae oe 


(R2) 
#550, (R2) 
7$351=10 


#BUFF ,SP 
MRETN,RTRAPS 
RTRAP5+2 
%0,%0 


1$ 
#1055,=-(R2) 
-(R2) 

2$ 
#1056,-(R2) 
-(R2) 

3$ 
#1057,=(R2) 
-(R2) 


4$ 


#1060,-(R2) 
-(R2) 


CC,%0 
5$ 


UPDATE TEST NUMBER 
SEQUENCE ERROR? 
;BR TO ERROR HALT ON SEQ ERROR 


CLEAR FUTURE PRIORITY AND CC 
: TEST FOR ‘'C'' CLEARED 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

Z CONDITIONAL BRANCH INST. AND 

é REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 766 

SMOVE TO MAILBOX # x*xeewe 1055 xeannne 
:SET MSGTYP TO FATAL ERROR 

:C NOT CLEARED 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 761 
“MOVE TO MAILBOX # xxewxnwe 1056 xeennne 
zSET MSGTYP TO FATAL ERROR 
32 NOT CLEARED 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ ate 
“MOVE TO MAILBOX #4 xxexxxe 1057 eannnne 
SET MSGTYP TO FATAL ERROR 
3V NOT CLEARED 


Be Be Be Be 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 747 


MOVE TO MAILBOX # xxeexxe 1060 xxenene 
;SET MSGTYP TO FATAL ERROR 

:C NOT CLEARED 

: TEMP STORAGE 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 


AAAA 
out wu 


inu tt 


noun 
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WHICH FOLLOWS W/ i 
035356 012742 001061 #1061,=(R2) “MOVE TO MAILBOX # seeneee 106] eeeenee 
035362 -(R2) :SET MSGTYP TO FATAL ERROR 
:PRIORITY NOT ZERO 
001000 5$: MBUFF SP 
035410 142404 MRETO,RTRAPS 
000357 142400 #357 ,RTRAPS+2 +} NEW ‘'CC’* AND PRIORITY 
%0,%0 TRAP HERE 


035410 100404 1$ 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
é CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
é WHICH FOLLOWS W/ 722 
035412 012742 001062 #1062,-(R2) sMOVE TO MAILBOX # *xxxeeee 1062 eennnen 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 :N NOT SET 


035422 001404 eo 2$ 


AAAA 
ftuuw 


“wu 


; TO SCOPE: ay THE RIGHT BYTE OF THIS 
: ONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 715 
035424 012742 001063 , #1063,-(R2) ;MOVE TO MAILBOX # xxextee 1063 xeeneee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :Z NOT SET 


102404 : 3$ 


AAAA 


nruudu 
ruun 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE MOVE INSTRUCTION 

: WHICH FOLLOWS W/ 710 
012742 001064 #1064 ,-(R2) sMOVE TO MAILBOX # xxxexee 81064 eentnne 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :V NOT SET 


035446 103404 : 4s 


"ouuu 
te ee 
fuud 


AAAA 
funn 


:; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
is CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 703 
035450 012742 #1065,-(R2) :MOVE TO MAILBOX # *xeeee 1065 xennnne 
-(R2) 2 ght hag TO FATAL ERROR 
sC WN 


AAAA 
fiuud 
Wom 
iuu i 
“iououeu 


035476 001404 


Cc, %0 
#357,%0 
1$351 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE —_ INSTRUCTION 
: WHICH FOLLOWS W/ 672 
035472 012742 001066 #1066,-(R2) sMCVE TO MAILBOX # *xxxeee 1066 *eeenee 
005242 ~(R2) ;SET MSGTYP TO FATAL ERROR 
000000 :PRIORITY WAS CHANGED,OR WRONG $TSTNM 
; OR SEQUENCE ERROR 


ANAAA 
nuwuw 
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RRRR S 


NONNNY 2 SS 3 So 


035502 
000351 


000150 
035536 


001067 
000000 


Ol ed cd oD cd ad ce cd ae cael ced cel el 
RRRRERERRR 
WAI OS OONOAMRW--+ 
oO 
WG 
wi 
wi 
pat 
Nm 


~m 
~ 


005212 
000352 


000150 
035562 


000142 


035570 
035574 
035576 


001070 


000353 
000150 
142326 
035630 


142312 


001071 


001000 


000400 
035656 012767 035676 


MACY11 30A(1052) 
7350 


142260 


142224 


142156 


142720 


19=JUN=79 
TEST THAT ‘NEW’ STATUS I 


M 16 
11:08 PAGE 207 


S CORRECT SEQ 0207 


LEAR REE EKER EERE ERE EERE EE ERROR EERE Oe 


TEST 351 


TEST THAT DECREMENT R6 TO A VALUE LESS THAN 400 TRAPS 


ete. tet 1 eee ae eee tee women ce ee 


7S351: INC (R2) 
CMP #351, (R2) 
BNE T$352=10 
MOV #150,%6 
MOV ATDEC1,4 
TST -(6) 
MOV #1067,=(R2) 
INC -(R2) 
HALT 

TDEC1: 

FEET REE EKEKKKEKK 

STEST 352 

—s wae 

TS352: INC (R2) 
CMP #352, (R2) 
BNE 1$353-10 
MOV #150,%6 
MOV ATDEC2,4 
TST -(6) 

TDEC2: CMP %6,4142 
BEQ 353 
MOV #1070,-(R2) 
INC -(R2) 
HALT 


FEAR KEKE EERE EKER EK EKER KK 


STEST 353 TEST DIFFERENT T 
a gue ooh cs cae 
TS353: INC (R2) 

CMP #353, (R2) 

BNE T$354-10 

MOV #150,%6 

CLR 146 

MOV MTDEC3.4 

INC -(6) 
TDEC3: TST 146 

BNE 1$ 

MOV #1071,-(R2) 

INC ~(R2) 

HALT 
1$: MOV #1000,%5 


MOV #400, £6 
#TDEC4,4 


UPDATE TEST NUMBER 

SEQUENCE ERROR? 

BR I TO ison OR HALT ON SEQ ERROR 

aire OVERF LOW Lina POINTER 
ITH R6 = 150 S TRAP 

MOVE TO MA MAILBOX v7 Ngenevnd 1067 

:SET MSGTYP TO FATAL ERROR 

;SHOULD HAVE TRAPPED.OR WRONG $TSTNM 


RRERREE 


REE KKKKKREKEKEEKKEEEEEREKKEEREREEEEEKEEEEREE REE REED 


TEST FOR DECREMENT OF R6 ON OVERFLOW TRAP 


FOO IOIOISIIUISIIOIOIISIOIIUIDIOIUIOIIIDIOIIDIIIDIIINO Onn ne nenee 
UPDATE TEST NUMBER 

s SEQUENCE ERROR? 

:BR = 1500 HALT ON SEQ ERROR 


NTE 
180 SHOULD TRAP 
‘DID R6 DECREMENT 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 766 
“MOVE TO MAILBOX # *x*x*xxx«x = §=1070 
:SET MSGTYP TO FATAL ERROR 
:R6 NOT = 142,0R WRONG $TSTNM 
: OR SEQUENCE ERROR 


LARRASRSSASAESESASA SASS SELES ESE RS SESE RS EERO CC eee ee. 
YPES OF OVERFLOW 
REKKEKKKEKKREKKEKEKEKEKEKEEAKKAREAEKEAEEREEEREERERE EERE ERE ee 
;UPDATE TEST NUMBER 

;SEQUENCE ERROR? 

:BR TO ERROR HALT ON SEQ ERROR 


STATUS WORD OF LOC 10 
RETURN TO LOC 4 


ReeRREE 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
: CONDITI L BRANCH INST. AND <==== 
: REPLACE THE MOVE INSTRUCTION <==== 

WHICH FOLLOWS W/ 764 <€s=se2 


;MOVE TO MAILBOX # 1071 
SET MSGTYP TO FATAL ERROR 
INCREMENT OPERATION NOT INHIBITED 


RKKKKKE akaekene 


B 1 
yay wake + CPU det MACY11 30A(1052) 19=JUN=-79 11:08 PAGE oe 


JKDBB P11 19=JUN=79 10:52 1353. ~—~« TEST DIFFERENT TYPES OF OVERFLOW SEQ 0208 
10467 035664 124645 CMPB Ss =(6) , = 

10468 035666 012742 001072 MOV W1073,<tR2) ZMOVE TO MAILBOX # *eeeeee 1072 seneeee 

10469 035672 005242 INC =(R2) [SET MSGTYP TO FATAL ERROR 

10470 035674 000000 HALT :STACK = 400 AND DECREMENTED, SHOULD TRAP 

10471 035676 012706 000400 TDEC4: MOV #400, %6 

10472 035702 012767 035722 142074 MOV ATDEC7,4 

10473 035710 134546 BITB = =(5) , = (6) 

10474 035712 TDEC6: : 

10475 035712 012742 001073 MOV #1073,-(R2) ZMOVE TO MAILBOX # xaxeeee 1073 xenenes 

10476 035716 005242 INC =(R2) :SET MSGTYP TO FATAL ERROR 

10477 035720 000000 HALT ZNO STACK OVERFLOW,OR WRONG $TSTNM 

10478 035722 TDEC7: 

10480 ; FERRERO REEEKEREREKEEKEREEEEKEEEEEEEEEKERERREEREEEREEREREEEEEEEEE EERE ERE 
10481 STEST 354 TEST THAT AN 77 CAUSES AN OVERFLOW TRAP 

10482 FERRER REE EREERREKEEREREKEREE REE EEEEEREREREEEAEEREEREEEEEEEREREER EEE 
10483 035722 005212 TS354: INC (R2) :UPDATE TEST NUMBER 

10484 035724 022712 000354 CMP #354, (R2) SSEQUENCE ERROR? 

10485 035730 001011 BNE VDEC2 [BR TO ERROR HALT ON SEQ ERROR 

10486 035732 012706 000400 MOV #400, %6 :SET UP STACK TO OVERFLOW 

10487 035736 012767 035754 142044 MOV #VDEC2,10 ‘SET UP 77 VECTOR 

10488 035744 012767 035764 142032 MOV AVDEC1.4 [SET UP OVERFLOW VECTOR 

10489 035752 000077 77 :THIS TRAP SHOULD CAUSE OVERFLOW 

10490 035754 VDEC2: 

10491 035754 012742 001074 MOV #1074,-(R2) :MOVE TO MAILBOX # «eeneee 1074 seeneee 

10492 035760 005242 INC =(R2) [SET MSGTYP TO FATAL ERROR 

10493 035762 000000 HALT ZTRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
10494 035764 012767 600012 142016 VDEC1: MOV #10+2,10 

10495 FERRER EKER EEE EREREEREREREREEEERAEE AREER EEREREREREEEE 
10496 STEST 355 TEST THAT AN IOT CAUSES AN OVERFLOW TRAP 

10497 SERRE EREKRERKEREEEEKEEEKEREREEKEEREREREREREREREREREEEEREE EERE EERE EREEEKEEE 
10498 035772 005212 TS355: INC (R2) ;UPDATE TEST NUMBER 

10499 035774 022712 000355 CMP #355, (R2) TSEQUENCE ERROR? 

10500 036000 001011 BNE VDEC4 [BR TO ERROR HALT ON SEQ ERROR 

10501 036002 012706 000400 MOV #400, %6 :SET UP STACK TO OVERFLOW 

10502 036006 012767 036024 142004 MOV #VDEC4, 20 :SET UP IOT VECTOR 

10503 036014 012767 036034 141762 MOV AVDEC3.4 :SET UP OVERFLOW VECTOR 

10504 036022 000004 10T [THIS TRAP SHOULD CAUSE OVERFLOW 

10505 036024 VDEC4: 

10506 036024 012742 001075 MOV #1075,-(R2) :MOVE TO MAILBOX # xxeweee 1075 seeeeee 

10507 036030 005242 INC -(R2) [SET MSGTYP TO FATAL ERROR 

10508 036032 000000 HALT :TRAP FLAG OVERFLOW DID NOT OCCUR.OR WRONG $TSTNM 
10509 036034 012767 000022 141756 VDEC3: MOV #20+2,20 

10510 SEAR EERE REE KEKE EERE EEEEEREKEEEEEEEKEEREKREEEEERREREE 
10511 TTEST 356 TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 

10512 : cic? me om oo ee aaeate tent meee ree eee 
10513 036042 005212 TS356: INC (R2) :UPDATE TEST NUMBER 

10514 036044 022712 000356 CMP #356, (R2) s SEQUENCE ERROR? 

10515 036050 001011 BNE VDEC6 [BR TO ERROR HALT ON SEQ ERROR 

10516 036052 012706 000400 MOV #400, %6 :SET UP STACK TO OVERFLOW 

10517 036056 012767 036074 141744 MOV #VDEC6, 30 ‘SET UP EMT VECTOR 

10518 036064 012767 036104 141712 MOV AVDECS.4 :SET UP OVERFLOW VECTO! 

10519 036072 104000 EMT THIS TRAP SHOULD EAUSE OVERFLOW 

10520 036074 VDEC6: 


2 001076 MOV #1076,-(R2) sMOVE TO MAILBOX # xxeanee 1076 txnenee 
10522 036100 005242 INC ~(R2) :SET MSGTYP TO FATAL ERROR 
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036102 
036104 
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000000 
012767 


012742 
005242 
00000: 


0 
012767 


012742 
005242 


000000 
012767 


005212 
022712 
001011 
012706 
012767 
mele 67 


012742 
005242 


012767 
020627 
001404 


012742 
005242 
000000 


000032 


000357 


000400 
036144 
036154 
001077 


000036 


000360 
000400 
036214 
036224 
001100 


000016 


000006 
000370 


001102 


MACY11 30A(1052) 
1356 


141716 


1700 
1642 


—) od 
“se 


141652 


141562 


141502 


HALT 
VDECS: MOV 


. ¥ 
19=JUN=79 11:08 PAGE 209 
TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


#30+2,30 


3 TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 


FREER AERA ERE REEREE EERE EEE 


TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 


SERA REAR EAKEKEEEREREEERERREEEREEE EERE RHEE ERE ERE ERE ERE EER 


TEST 357 


1S357: INC 


VDEC8: 


HA 
VDEC7: MOV 


(R2) 

#357, (R2) 
vbE C8 
#400, %6 
AVDEC8, 34 
AVDEC7.4 


#1077,=(R2) 
~(R2) 


#34+2,34 


; UPDATE TEST A 
C ERROR T ON SEQ ERROR 
ISET UP STACK TO OVERFLOW 
7SET UP TRAP VECTOR 
7SET UP OVERFLOW VECTOR 
: THIS TRAP SHOULD CAUSE OVERFLOW 


sMOVE TO MAILBOX # ‘**x%xxe% = §=1077 
;SET MSGTYP TO FATAL ERROR 
; TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 


REKKKKK 


SERRA KEE ERE KEKE EERE ERE REE EK EER EEEEERERE EE 


TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


JERR ERK KEKE EKER EERE EEK EKER 


:TEST 360 
TS360: 


VDEC10: 


VDEC9: 


(R2) 
#360, (R2) 
VDEC10 
#400, %6 
#VDEC10,14 
#VDEC9,4 
#1100,-(R2) 
~(R2) 


#144+2,14 


UPDATE TEST NUMBER 


2 SEQUENCE ERROR 
TO ERROR HALT ON SEQ ERROR 
SET UP STACK TO OVERFLOW 
7SET UP TRT VECTOR 
SET UP OVERFLOW VECTOR 
THIS TRAP SHOULD CAUSE OVERFLOW 


:MOVE TO MAILBOX # 1100 
:SET MSGTYP TO FATAL ERROR 
; TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 


RRKKKKEK REKKKKE 


FERRER EERE EERE EKER EKEEKCKEREREKEEEEEKREEEEEEKEEREEEEEEEEEEREEEREEEEEKEEEEEEEREKKEEEEEE 


TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


FARRER REE EEE ERE EEE EERE REREEEEEREREE EEE EERE EREREEREREEEEEEE EEE 


TEST 361 
7S361: 


VDEC11: 


VDEC12: 


(R2) 
#561 , (R2) 
VDEC11 
#400, %6 
#VDEC11,4 
AVDEC12.,4 


#1101,-(R2) 
-(R2) 


#442,4 
%6,4370 
TS362 


#1102,-(R2) 
~(R2) 


;UPDATE TEST NUMBER 
SEQUENCE ERROR? 
BR TO SEQ ERROR 


ERROR HALT ON 

sSET UP STACK TO OVERFLOW 

SET UP ILLA VECTOR 

[SET UP OVERFLOW VECTOR 

:THIS TRAP SHOULD CAUSE OVERFLOW 
sMOVE TO MAILBOX # xeeaxee §=1101 
SET MSGTYP TO FATAL ERROR 
: TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $T3TNM 


STACK PUSHED FOUR WORDS? 
: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL CH | 


: NST. AND 
; REPLACE THE MOVE INSTRUCTION 
Z WHICH FOLLOWS W/ 754 
sMOVE TO MAILBOX # reed 1102 
7SET MSSTYP TO FATAL ERROR 
; TRAP OVERFLOW DID NOT OCCUR 


RERETEE 


AAAA 


REEEKEK 


SEQ 0209 


D1 
CJKDB-B DCF11=AA CPU_DIAG. MACY11 30A(1052) 19=JUN=79 11:08 PAGE 210 
CJKDBB.P11 19=JUN=79 10:52 1361 TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP SEQ 0210 


OR SEQUENCE ERROR 


PITTI TISITIIIIITITIIT IIIT TTT LLITTI Te TiTTT TTT TTTTTTT TTT TTTIT TTT Titi T TTT TTT 
TEST 362 TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 
FERRARA EEREREREEEEEEREREREREEREEEEREREEEREEREEREREEEEEEEEEEEEEEEE EEE EE 
1$362: (R2) UPDATE TEST NUMBER 
CMP SEQUENCE ERROR? 
BR _TO ERROR HALT ON SEQ ERROR 
:SET UP STACK TO OVERFLOW 
SET UP ILLB VECTOR 
SET UP OVERFLOW VECTOR 
eal THIS TRAP SHOULD CAUSE OVERFLOW 


012742 MOV #1103,-(R2) sMOVE TO MAILBOX # xexanee 1103 weennen 


005242 -(R2) 2 SET MSGTYP TO FATAL ERROR 
000000 HALT ; TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
012767 141414 VDEC14: MOV #4+2,4 


FEE KEKE EERE ERE EEE 


sTEST 363 TEST FOR FALSE OVERFLOW TRAP 


FERRER EKER EERE EKER EER 


TS363: (R2) UPDATE TEST NUMBER 
000363 C #363, (R2) SEQUENCE ERROR? 
FOVER :BR TO ERROR HALT ON SEQ ERROR 
036446 141376 #FOVER,4 SET UP OVERFLOW POINTER 
001062 MOV #1002 ,%6 
-(6) SHOULD NOT OVERFLOW 
002062 #2002 ,%6 
-(6) ;SHOULD NOT OVERFLOW 


004002 w4902, %6 
-(6) SHOULD NOT OVERFLOW 
010002 _ x6 


020000 MOV #20000.26 SHOULD NOT OVERFLOW 
STP 


BEees 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 754 


012742 001104 ¥ #1104,-(R2) :MOVE TO MAILBOX # *e*eeee 1104 eeeeene 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 ;I1T OVERFLOWED,OR WRONG $STSTNM 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


RERRRERESEERS 
MO OdONAUSWN—O 





E—E 1 
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CJKDBB.P11 19=JUN=79 10:52 1363 TEST FOR FALSE OVERFLOW TRAP SEQ 0211 


012767 000006 141320 STP: #6,4 
005067 141316 6 

FERRER EEEEEKEEKEKEEEREERREREEEREEEEEEEEEEEEEEREEEREEEEEEEEEEKREE KEE EE 

TTEST 364 TEST THAT BIT 4 PSW WILL CAUSE A TRAP TO 14 

FREER EERE EERE KERR EREERERRREREEREEREEREREREEREEERE REE 

TS364: (R2) :UPDATE TEST NUMBER 

CMP i366 (R2) S SEQUENCE ERROR 
7536510 [BR TO ERROR mT ON SEQ ERROR 


#BUFF ,SP 

141302 #RETAT,RTRAPG  ;SET UP TO TRAP TO 14 
#20,-(SP) ;PUSH T BIT 
#.+6,-(SP) 


#1105,=(R2) “MOVE TO MAILBOX # *eeenee 81105 teenewe 
-(R2) :SET MSGTYP TO FATAL ERROR 
RETAT: STRACE BIT DID NOT TRAP!,OR WRONG $TESTN 


FER KKKKEEREKEKKEEEEREEEEKEEEKEKEEREEEEEEEREEREREEEEEEREEEEEREEREREREREKERREKEEREEE 
TEST 365 TEST STACK POINTER DECREMENTS 
FREER EK KKK RRR ERE KERE 
1S365: (R2) ;UPDATE TEST NUMBER 
C #365, (R2) SEQUENCE ERROR? 
1$366-10 BR TO ERROR HALT ON SEQ ERROR 


#BUFF ,SP 

141234 #RETBT ,RTRAPS 
#20,-(SP) PUSH T BIT 
#.+6,-(SP) ;PUSH PC 


#1106,-(R2) “MOVE TO MAILBOX #& xeeexee 1106 xeennee 
-(R2) :SET MSGTYP TO FATAL ERROR 
: TRACE BIT DID NOT TRAP! 


SP, ABUF F -4 
TS 366 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
: CONDITIONAL BRANCH INST. AND <€==== 
: REPLACE THE MOVE INSTRUCTION <==== 
= WHICH FOLLOWS W/ 755 <==== 
012742 001107 #1107,-(R2) SMOVE TO MAILBOX # *xexxee 1107 xeeneee 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 
000000 :STACK POINTER WAS Nor PUSHED BY TRAP,OR WRONG $TESTN 
: OR SEQUENCE ERR 
RE et IR AS AL REET TE, Mo seare Me tt OO 
[TEST 366 TEST FOR PROPER PC ON STACK 
aide. ter Mae” Ae eet Geet ee ee 
TS366: (R2) ZUPDATE TEST NUMBER 
C #366 (R2) :SEQUENCE ERROR? 
367-10 ‘BR TO ERROR HALT ON SEQ ERROR 


teur Sp 
141150 #RETCT RTRAPG 
#20,-(SP) PUSH T BIT 
#.+6,-(SP) 7PUSH PC 
sSET T BIT 
; TRAP HERE 
022767 036656 142110 RETCT: #, ,BUFF=4 








a 
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CJKDBB.P11 19=JUN=79 10:52 TES’ FOR PROPER PC ON STACK SEQ 0212 
10679 036664 001404 BEQ TS367 
10680 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10681 ; CONDITIONAL BRANCH INST. AND <==== 
10682 3 REPLACE THE MOVE INSTRUCTION <==== 
10683 ; WHICH FOLLOWS W/ 761 <ss22 
10684 036666 012742 001110 MOV #1110,-(R2) sMOVE TO MAILBOX # **eenee 1110 xeennne 
10685 036672 5242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 
10686 036674 000000 HALT ;CORRECT PC WAS NOT SAVED ON STACK,OR WRONG $TESTN 
10687 ; OR SEQUENCE ERROR 
10688 
10689 
10690 FERRER EKER KERR ERK EKER EERE REE REE EEE EERE EKER 
10691 STEST 367 TEST THAT RTT POPS T= BIT 
10692 FERRER ERK EKER OEE EERE ERE ERE ERE EE 
10693 036676 521 TS367: INC (R2) ;UPDATE TEST NUMBER 
10694 036700 022712 000367 CMP wer, (R2) ;SEQUENCE ERROR 
ipeee 036704 101 BNE TS370-10 BR TO ERROR AT ON SEQ ERROR 
10697 0367 012706 001000 MOV A#BUFF SP 
10698 036712 005001 CLR R1 :CLEAR R1 
10699 036714 012746 000020 MOV #20,-(SP) 
10700 036720 012746 036734 MOV #RTT1,-(SP) 
10701 036724 012767 036750 141062 MOV ARTT2,14 
10702 036732 RTT 
10703 036734 000240 RTT1: NOP 
0704 036736 001404 BEQ TS370 
10705 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
10706 ; CONDITIONAL BRANCH INST. AND <==== 
10707 ; REPLACE THE MOVE INSTRUCTION <==== 
10708 Z WHICH FOLLOWS W/ 762 <z=== 
10709 036740 012742 001111 MOV #1111,-(R2) sMOVE TO MAILBOX # tteeeee 1111 xeeenee 
10710 036744 005242 INC -(R2) zSET MSGTYP TO FATAL ERROR 
10711 036746 000000 HALT ;T-BIT DID NOT TRAP,OR WRONG $TESTN 
10712 ; OR SEQUENCE ERROR 
10713 
10714 036750 RTT2: 
10715 FREER KEKE KKK EEE ERE EEEEEKEEREKREKEREK 
10716 sTEST 370 TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 
10717 FARE KERR EEE REE EERE KEKE EERE EERE KERR EKEEEEEEEE EEE 
10718 036750 521 TS370: INC (R2) ;UPDATE TEST NUMBER 
10719 036752 022712 000370 CMP #370, (R2) ; SEQUENCE ERROR? 
10720 036756 001030 BNE TS371-10 [BR TO ERROR HALT ON SEQ ERROR 
10721 036760 012705 177777 MOV #177777 ,%5 
10722 036764 012706 001000 RTT5: MOV ABUFF ,SP 
10723 036770 012746 000020 MOV 0,- 
10724 036774 012746 037012 MOV #RTT3,-(SP) 
10725 037 012767 037030 141006 MOV #RTT4,14 
10726 037 5001 CLR 1 :CLEAR RO 
10727 037010 RTT sSET T-BIT 
10728 037012 005201 RTT3: INC R1 
10729 037014 005205 INC %5 
0730 037016 001762 BEQ RTTS :D0 THIS ress NO MORE THAN e7 TIMES 
10731 037020 012742 001112 MOV #1112,-(R2) *MOVE TO MAILBOX # *xeeeeee 1112 wennnne 
10732 037024 5242 INC -(R2) :SET MSGTYP TO FATAL ERROR 
10733 037026 000 HALT I 
107 037030 005301 RTT4: DEC P1 SEE IF TaN ALLOWS 1 INST. 
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037032 
037 
037036 


037050 


037050 


037120 
037122 


037124 
037130 
037132 


037142 
037144 


037210 


012742 
005242 
000000 


012742 
005242 
000000 


005212 
022712 
001026 


001113 


000371 


001600 
000020 
037106 
037120 


001114 


001115 


000372 


001000 
037210 
000016 


MACY11 30A(1052) 
7370 


140712 


140636 


140624 


RTT6: 


G 1 
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TEST 

BEQ 
INC 
BEQ 


MOV 
INC 
HALT 


RTT6 
%5 
RTTS 


#1113,=(R2) 
-(R2) 


THAT RTT ALLOWS ONE INST. BEFORE TRAP 


3DO THIS TEST NO MORE THAN TWO TIMES 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDITIONAL BRANCH AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 747 


“MOVE T 


xX # 


RRKEKKKK 


TO MAILBO 
:SET MSGTYP 70 FATAL ERROR 


RTT DID NOT ALLOW 1 INST.,OR WRONG $TESTN 


INST. 


1113 


REKKKEK 


SEQ 0213 


FARRER EEK EKER ER 


STEST 371 


1S371: 


RTI1: 


RTI2: 


1$372: 


TRACE: 


INC 


MOV 
INC 
HALT 


INC 


TEST THAT RTI DOES NOT ALLOW 1 INST. 


eat. i... as. co Me ae mee oe 


(R2) 
#371, (R2) 
1S372-10 
mur, SP 
#20,-(SP) 
#RTI1,-(SP) 
#RT12.14 
R1 


R1 
#1114,-(R2) 
-(R2) 


R1 
TS372 


#1115,-(R2) 
-(R2) 


TEST TRAP ON TRAP THAT TRACE BIT TRAPS ARE INHIBITED ON TRAP INST 


(R2) 
#372,(R2) 
BR70 


ABUFF ,%6 
eee 


#.+6,-(SP) 


UPDATE TEST NUMBER 


; SEQUENCE ERROR 
:BR TO ERROR HALT ON SEQ ERROR 


sSET T-BIT 
RTI SHOULD NOT ALLOW THIS 
:MOVE TO MAILBOX # 
:SET MSGTYP TO FATAL ERROR 
:T- BIT DID NOT CAUSE TRAP 


RTI SHOULD NOT ALLOW 1 INST. BEFORE TRAP 


TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
CONDIT 


ITIONAL BRANCH INST. 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 755 

:MOVE TO MAILBO 


xX # 


RKKKKKK 


RKKKKKEK 


SET MSGTYP TO FATAL_ERROR 


RTI DID ALLOW 1 INST. BEFORE TRAP,OR WRONG $TESTN 


OR SEQUENCE ERROR 


FR RK KKK KEK ERK IKKE KEKE KKK KEKE REE EERE EERE EEE EE EEEREKEEEKEKEE EEK 


TEST 372 


Sasi der aa EROS ei ce GI Geer inane ee 


;UPDATE TEST NUMBER 


SEQUENCE ERROR? 
BR TO ERROR HALT ON SEQ ERROR 


; TRACE TRAP 


:IOT TRAP 
:PUSH T BIT 
[PUSH PC 


1114 


1115 


TRAP, NEW CC HAVE TRACE RESET 


REKKEKEK 


AND 


RREKKKK 


AAAA 
“uuu 
“uuu 
uuu 


H 1 
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CJKDBB.P11 19=JUN=79 19:52 1372 TEST TRAP ON TRAP THAT TRACE BIT TRAPS ARE INHIBITED ON TRAP INST SEQ 0214 


037210 012742 001116 #1116,=(R2) sMOVE TO MAILBOX # kennex 1116 teeter 
005242 -(R2) SET MSGTYP TG FATAL ERROR 
000000 BR70 ; TRACE TRAP WAS NOT INHIBITED 


012742 001117 #1117,-(R2) sMOVE TO MAILBOX # *eeeeee 1117 eeeanen 
005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 HA sWRONG TSTNM,OR WRONG $TSTNM 

012767 000016 TONT1: V #16,14 


012767 000022 MOV #22,20 
AISI IIUIIIDISI I IUIIISISIIOIIOIIISISIOIIIOIOIOIIOIIIIIOIOI III IOI IOI III II ITT TTT TIT TOTTI 
TEST 373 TEST THAT THE TRACE BIT IS S4VED IN THE STACK 
Soapmet apart eee ee AIEEE IIIS IOI IOISISISIOIIUIOIIOIIIIOIIIIIIO IOI IOS 
S373: (R2) UPDATE TEST NUMBER 
#373, (R2) : SEQUENCE ERROR 
TP3 :BR TO ERROR HALT ON SEQ ERROR 
PBUFF, %6 ;SET UP STACK POINTER 
140526 a 214 TRACE TRAP RETURN 


#20,-(SP) SET THE T BIT 
#TRC1,~(SP) 


R 
141466 000020 : BUFF -2,420 CHECK FOR T BIT ON STACK 
BN STP3D 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 757 
037314 STP3: 


012742 001120 #1120,-(R2) sMOVE TO MAILBOX # xxxeeee 1120 xeennne 

005242 -(R2) :SET MSGTYP TO FATAL ERROR 

000000 HA :T BIT NOT SAVED ON THE STACK,OR WRONG $TSTNM 
037324 012767 000016 140462 STP3D: #16,14 


DAI IIISIOIIIIIIAIIISIDIIOIOIOIOIOISIOIIOIOISIIOIOIOIOI IIIT OI IIT OI TOIT TOTO I OTTO TIE 
THIS ROUTINE TESTS THAT NO LEGAL ADDRESS TRAPS AND THAT AN ILLEGAL 
SADDRESS TRAPS TO LOCA | mg 4. 
SWITCH REGISTER BIT 1= 
SAT, SINCE 
; CHECKED. 

NO L 


037312 


AAAA 


‘A TIMEOUT OM OK=28K OR 30k. 
;THIS ROUTINE TESTS MEMORY UNTIL IT DOES A NXM uTor 
<eeeRRRERERRERERREREREREEREERERERERARRRRTERERERERERR ERR RRRREREEEEREREREEeReeRRREERe 
STEST 374 TEST NON-EXISTENT ADDRESS TRAPS 
as Se cc Me ee aaeee weet eee ee 
037332 005212 1S374: (R2) ;UPDATE TEST NUMBER 
0373 000374 CMP #374, (R2) :SEQUENCE ERROR? 
BN 1S375-10 [BR TO ERROR HALT ON SEQ ERROR 
010000 037412 #10000, a#HICORE :SET HIGHT CORE LIMIT TO 160000 
600002 000322 #2, QASSWREG ZCHECK IF BIT 1 IS SET 
1$ [BRANCH IF IT IS, LEAVE LIMIT=160000 
010000 037412 #10000. aMHICORE ; [SET UPPER CORE LIMIT TO 30K (170000) 


005067 140412 6 : 
037374 012767 037502 140402 MATRAP ,4 SET UP ADDRESS TRAP ENTRANCE 
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037402 012706 001000 MOV :SET STACK "er cone 
037406 0 


NOR: STB + SIF OUTSIDE OF C TRAP T 
C iJs POINTER INSIDE “ba (30K) CORE 
HICORE : MAY BE CHANGED TO 170000 IF 30k 
BL NOR “TEST THE REST OF CORE 
037440 MOV #ROTRAP, as [SET UP NEW VECTOR POINTER 
105737 177700 ananel T a#177700 :SHOULD CAUSE A TRAP 
012742 001121 MO #1121 ,-(R2) ZMOVE TO MAILBOX # *exexee 1121 eeeeene 
INC (R2) 2 SET . ee > FATAL ERROR 
HALT “SHOULD HAVE TRAPED 
; TRAP TO ERE IF sane TRAP BY TESTING 15700 
037440 140332 ROTRAP: MFPS STATUS 
037444 140326 Ist STATUS sTEST PSW 


037450 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH Pap meen W/ 733 
037452 012742 001122 #1122,-(R2) :MOVE TO MAILBOX weaneee 1122 teenene 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 NEW PSW SHOULD HAVE BEEN ZERO 
026727 141306 037430 : en TEST OLD PC AT STACK 


037470 001453 

: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

: CONDITIONAL BRANCH INST. AND 

: REPLACE THE ype INSTRUCTION 

WHICH FOLLOWS W/ 723 
037472 012742 #1123,-(R2) SMOVE TO MAILBOX # xeexeee 1123 xeaeeee 
037476 005242 -(R2) SET MSGTYP TO aoa * ster: 
037500 000000 HA 7OLD PC WAS NOT SAV 
es ogg AN ADDRESS TRAP FROM MEMORY BELOW yak (OR 30K) 

037502 005300 ATRAP: RO 


037504 010067 000032 MOV RO, CORH ;MOVE THE FIRST NXM LOCATION IN CORH 
: THIS ROUTINE vay NXM TRAPS UNTIL IT FINDS AN EXISTENT MEMORY LOCATION 
037510 013700 037412 MOV @AHI CORE ,RO SET UP THE HIGHEST MEM LOCATION 
~ ae iMAKE 1 LESS THAN THE me tL CORE BOUNDARY 
BR DON'T SUBTRACT 1K FIRST TIME 
037520 001000 CTRAP: #1000.RO ; SUBTRACT 1K OCTAL BYTE FROM ADDRESS 
:TO_ SPEED UP TESTING 
037524 037556 140252 NOSUB: A#BTRAP ,4 [SET UP THE VECTOR 
037532 001000 MO #BUF F , SP 
037536 (RO) stg ag Rey -y EXIST? 


:I TO BTRAP 
037540 DTRAP1: RO, (PC) + sav EXISTS: Is IS THIS THE SAME TRAP THAT CAUSED 


: TRAP T 
037542 CORH: .WO 0 
037544 101425 TRAPB 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE Ay INSTRUCTION 
3 WHICH FOLLOWS W/ 675 
037546 012742 001124 #1124,-(R2) :MOVE TO MAILBOX # omen 1124 weanees 
037552 005242 -(R2) sSET MSGTYP TO FATAL re 
037554 000000 CONTENTS OF RO SHOULD BE LESS THAN OR EQUAL 
:IF THIS COMPARISON FAILS IT MEANS 
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10903 : THAT SOME LEGAL ADDRESS TRAPPED, OR 
10904 : THAT AN ILLEGAL ADDRESS DID NOT TRAP 
10905 037556 106767 : STATUS 


10906 005767 T STATUS 
10907 037566 001404 1$ 
1 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE Age INSTRUCTION 
: WHICH FOLLOWS W/ 664 
037570 012742 #1125,-(R2) sMOVE TO MAILBOX # seneeee 1125 #eeeeee 
037574 005242 -(R2) + SET MSGTYP TO FATAL ERROR 
000000 ;NEW PSW SHOULD HAVE BEEN ZERO 
026727 141170 037540 : — [CHECK IF TRAP PC IS OK 


001744 
; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
WHICH FOLLOWS W/ 654 


012742 001126 MO #1126,-(R2) sMOVE TO MAILBOX # seanxee 1126 xeenenn 
005242 -(R2) SET MSGTYP TO FATAL ERROR 
000000 ;O0LD PC WAS NOT SAVED OR WRONG $TESTN 
012767 000006 140156 : 46.4 sRESET TRAP CATCHER 

037626 005067 140154 6 sRESET TRAP CATCHER 


a3 


S 


Sseeeeeeee 
WOONAOUSW—O 


—> 


ee a a ed nd od od nd nd 


3% 
=5 


:THIS ROUTINE WILL FIGURE OUT IF YOU HAVE A DL11W 
037632 005067 000020 CLR PROF TE 


012706 001000 MOV BUFF , SP SET UP THE Up POINTER 
012767 037660 140134 MOV #DL11W,4 SET _UP THE T VECTOR 

005767 137710 yy TPS : TEST THE PUNCH STATUS REGISTER 
000403 DL11W1 

000000 PROF TE : 900000 

005267 177772 DL11W: INC PROF TE zINCR IF NO DL11W 

012767 000006 140112 DL11W1: mov 46,4 


037672 SKP104: 
3 REE KEKE EKKKEKEEEEEEREK 
[TEST 375 TEST THAT A TTY INTERRUPT CAUSES AN OVERFLOW TRAP 
ee tee ee dee ees eee ace ee 

037672 005212 1S375: (R2) ZUPDATE TEST NUMBER 

000375 #375, (R2) : SEQUENCE ERROR? 
BNE TDEC8 O ERROR HALT ON SEQ ERROR 
177750 PROF TE 


R7TRX 
000001 #APTENV, SENV RUNING IN APT MODE? 
2s :1F NOT, DO THIS TEST 
140362 $PASS 71S THIS THE FIRST PASS? 
BNE R7TRX SIF NOT FIRST PASS, SKIP TEST 


000340 140040 MOV #340, STATUS LOCK out INTERRUPT 

C00400 #400, %6 ;SET UP — TO OVERFLOW 

040010 140034 #TDEC77,4 SET UP OVERFLOW T 

040000 140106 #TDECB,64 SET UP_INTERRUPT VECTOR 
037756 012767 000100 137600 #100, TTCSR SET INTERRUPT ENABLE 
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10959 0377 005067 140006 , STATUS sALLOW_ INTERRUPT TO OCCUR 

10960 012742 001127 #1127,=(R2) sMOVE TO MAILBOX # xexeee 1127 xeennee 
10961 005242 -(R2) SET MSGTYP TO FATAL ERROR 

0962 000000 NO INTERRUPT OCCURRED 

10963 040000 TDEC8: 


10964 012742 001130 MO #1130,-(R2) ;MOVE TO MAILBOX # xeeeexe 1130 senenne 

10965 005242 =(R2) :SET MSGTYP TO FATAL ERROR 

10966 040006 000000 HA [OVERFLOW TRAP DID NOT OCCUR OR WRONG $TSTNM 

10967 005067 137550 TDEC77: TTCSR [CLEAR INTERRUPT ENABLE 

10968 012767 000006 137762 MOV #6,4 

10969 005067 137760 6 

10970 R7TRX: 

10971 ; HEE REME RE KEEREEREREKEEEKEKREEEREEREEERE 
10972 STEST 376 TEST THAT A PENDING INTERRUPT OCCURS BEFORE TRAP 

10973 ima oe ween Wa wee 
10974 005212 S376: (R2) ;UPDATE TEST NUMBER 

10975 000376 CMP #376, (R2) SSEQUENCE ERROR? 

10976 040034 001045 BN BR71 ;BR TO ERROR HALT ON SEQ ERROR 

10977 177614 PROF TE 


NODL 
000001 140246 #APTENV, SENV RUNING IN APT MODE? 
BN 2s :1F NOT, DO THIS TEST 
140226 $PASS 31S THIS THE FIRST PASS? 
BN NODL IF NOT FIRST PASS, SKIP TEST 


BUFF ,%6 
137702 uae SET TO A HIGH PRIORITY LEVEL 


6 
#100, TTCSR : INTERRUPT FOR TTY PUNCH/PRINTER 
#BR71 , 34 : TRAP VECTOR 


:TTY VECTOR 

IF TRAP TRAPS, MOVE 340 TO PRIORITY 
STATUS ;SHOULD INTERRUPT AT END OF CLR INST 

zTTY INTERRUPT SHOULD OVERRIDE TRAP 


012742 i #1131,-(R2) zMOVE TO MAILBOX # *eaeeee 1131 teneene 
005242 -(R2) ‘SET MSGTYP TO FATAL 


ERROR 
— : TTY SHOULDN'T HAVE INTERRUPTED 


012742 001132 #1132,-(R2) sMOVE TO MAILBOX # *xaxxne 1132 xenneee 
005242 -(R2) z:SET MSGTYP TO FATAL ERROR 
000000 137652 TR ; TRAP OCCURRED FIRST,OR WRONG $STSTNM 


005067 36 
042767 000100 137372 ee, #100, TTCSR 
HE EOE SUS SUSE SSIS OBO IE IO UO SOUS OEOO OOO rn niriiirrrrrsrtisireeees 
TEST 377 TEST THAT A PENDING INTERRUPT, INTERRUPTS BETWEEN TRAPS 
"> saw naar prema" > gana 
1$377: (R2) UPDATE TEST NUMBER 
000377 #377, (R2) ;SEQUENCE ERROR? 
BN’ TRS 7BR TO ERROR HALT ON SEQ ERROR 
177450 PROF TE 


NODL 1 
000001 140102 #APTENV, SENV RUNING IN APT MODE? 

2s :1F NOT, DO THIS TEST 
140062 $PASS 1S THIS THE FIRST PASS? 


3 HS So oS SS 
— a at es es een os I 
SBSSSEsEs 


lelelejlele) 
ad ad od od 
WMO 
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11015 040224 001054 BNE NODL1 ;1F NOT FIRST PASS, SKIP TEST 

11016 040226 23: 

11017 040226 012706 001000 MOV #BUFF ,%6 

11018 32 012767 000340 137536 MOV #340, STATUS 

11019 040240 012767 000100 137316 MOV #100, TTCSR 

11020 040246 012767 040306 137560 MOV #TR3,34 3 TRAP 

11021 040254 012767 040320 137602 MOV ATR4 64 :TTY OUTPUT 

11022 040262 012767 000340 137576 MOV #340,66 :TTY OUTPUT PRIORITY 

11023 040270 012767 040310 137522 MOV #TRS,20 1 

11024 040276 012767 0 137516 MOV #340.22 ;10T PRIORITY 

11025 1044 TRAP [THE ACT OF TRAPPING LOWER PRIORITY 

11058 erty 000004 aes I0T INTERRUPT SHOULD OCCUR IN PLACE OF IOT TRAP 
11028 040310 012742 001133 MOV #1133,-(R2) sMOVE TO MAILBOX # *xxexnee 1133 xeannnn 

11029 040314 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

11030 040316 000000 HALT ;NO INTERRUPT BETWEEN TRAPS,OR WRONG $TSTNM 
11031 040320 005067 137476 TR4: CLR 22 ;CLR IOT PRIORITY 

11032 040324 005067 137536 CLR 66 

11033 040330 012767 000036 137476 MOV #36,34 

11034 040336 012767 000066 137520 MOV #66,64 

11035 040344 012767 000022 137446 MOV #22,20 

11036 040352 005067 137206 CLR TTCSR 

yt 24 040356 NODL1: 

11039 FERRE KEKE EEE EEE EERE EKER EKEEEEEEEEEEEREKEKEK 
11040 : TEST 400 TEST THAT ‘RESET'’ GOES TO OUTSIDE WORLD 

11041 J EAE EREEKERREEEK EEE KEKE KKEKEKEKEEEEKEKKEE 
11042 040356 005212 TS400: INC (R2) ;UPDATE TEST NUMBER 

11043 040360 022712 000400 CMP #400, (R2) ;SEQUENCE ERROR? 

11044 040364 001021 BNE TS40i- 10 7BR TO ERROR HALT ON SEQ ERROR 

11045 040366 005767 177264 TST PROF TE 

11046 040372 001022 BNE NODL2 

11047 040374 016700 137162 MOV TKB,RO ;MAKE SURE RECEIVER DONE IS SET 

11048 040400 012767 000100 137152 MOV #100, TRCSR :SET INTERRUPT ENABL 

11049 040406 000005 RESET ;SHOULD CLEAR INTERRUPT ENABLE 

11050 040410 032767 000100 137142 BIT #100. TRCSR ZTEST FOR CLEAR 

11051 040416 001410 BEQ T8401 

11052 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
11053 2 CONDITIONAL BRANCH INST. AND <==== 
11054 : REPLACE THE ae INSTRUCTION saz 
11055 s hgh FOLLOWS W/ 762 ===> 
11056 040420 012742 001134 MOV #1134,-(R2) sMOVE TO MAILBOX keekeee 1154 xeenene 

11057 040424 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

11058 040426 000000 HALT ;RESET FAILED TO CLEAR TRCSR 

11059 SEQUENCE ERROR 

11060 040430 012742 001135 MOV #1135,-(R2) “MOVE TO MAILBOX # *x*eeeee 81135 xeKKeee 

11061 040434 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

11062 040436 000000 HALT : WRONG $TSTNM 

11063 040440 NODL2: 

11064 FERRER KEKE EKER EEK EEE KEEKEKEREKEEKEEEERERREREEREKEEEEEREEE EKER EEREREEEEKEKEEEEE 
11065 TEST 401 TEST THAT RESET HAS NO EFFECT ON THE TRACE TRAP 

11066 Gedis Gt ct Gee ee eeene Ener cea eee 
11067 040440 005212 TS401: INC (R2) ;UPDATE TEST NUMBER 

11068 040442 022712 000401 CMP #401, (R2) ; SEQUENCE ERROR? 

11069 040446 001014 BNE RESET3 [BR TO ERROR HALT ON SEQ ERROR 

11070 040450 012706 001000 MOV #BUFF ,%6 7SET STACK 
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11071 040454 012767 040510 137332 MOV MRESET2,14 ;SET UP TRACE VECTOR 

11072 040462 012746 000020 MOV #20,-(R6) 7SET THE T-BIT ON STACK 

110735 040466 012746 040474 MOV #1$,-(R6) sMOVE NEW PC ON STACK 

11074 040472 000006 RTT 

11075 040474 000005 1$: RESET ;SHOULD HAVE NO EFFECT 

11076 040476 000005 RESET zNO EFFECT 

11077 040500 RESETS: 

11078 040500 012742 001136 MOV #1136,-(R2) sMOVE TO MAILBOX # *eeeeee 1136 xennnne 

11079 040504 005242 INC -(R2) zSET MSGTYP TO FATAL ERROR 

11080 040506 000000 HALT ; TRACE TRAP FAILED,OR WRONG $TSTNM 

11081 040510 005067 137262 RESET2: CLR STATUS sCLEAR TRACK 

11082 040514 005067 137276 CLR 16 ; TRACE STATUS 

11083 040520 012767 000016 137266 MOV #1614 

11084 040526 SKTST2: 

11085 Iti iii it it titi it titi i ttt ttitiitititititititTTTTTLTTTTiTTitiny 
11086 [TEST 402 TEST THAT WHEN TTY INTERRUPTS IT POPS NEW STATUS 

11087 FARRER AREER AREER REREREREREREREEE EERE EERE EEEEEKEEEEEEE 
11088 040526 005212 TS402: INC (R2) ;UPDATE TEST aa 

11089 040530 022712 000402 CMP #402, (R2) ;SEQUENCE ERR 

11090 040534 001057 BNE TTY11 BR TO ERROR MALT ON SEQ ERROR 

11091 040536 005767 177114 TST PROF TE 

11092 040542 001062 BNE NODL3 

11093 040544 122767 000001 137546 CMPB #APTENV, SENV ;RUNING IN APT MODE? 

11094 040552 001003 BNE 2$ :IF NOT, DO THIS TEST 

11095 040554 005767 137526 TST SPASS 31S THIS THE FIRST PASS? 

11096 040560 001053 BNE NODL3 :1F NOT FIRST PASS, SKIP TEST 

11097 040562 2s: 

11098 040562 RESET 

11099 040564 012706 001000 MOV HBUFF .%6 ;SET UP STACK 

11100 040570 012767 040614 137266 MOV #TTY3,64 ; INTERRUPT VECTOR 

11101 040576 005067 137174 CLR STATUS ;DROP PROCESSOR PRIORITY 

11102 040602 012767 000357 137256 MOV #357 ,66 sHIGH PRIORITY ON INTERRUPT 

11103 040610 105167 136750 COMB TTCSR ;SHOULD SET INTERRUPT ENABLE & INTERRUPT 

11104 040614 026727 137156 000357 TTY3: CMP STATUS ,4357 

11105 040622 001404 BEQ 1$ 

11106 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS ===: 
11107 : CONDITIONAL BRANCH INST. AND ==== 
11108 Z REPLACE THE aoe INSTRUCTION =s== 
11109 ; WHICH FOLLOWS W/ 744 zazz 
11110 040624 012742 001137 MOV . #1137,-(R2) sMOVE TO MAILBOX # weeded 1137 weaxeee 

11111 040630 005242 INC -(R2) :SET MSGTYP TO FATAL ERROR 

11112 040632 000000 HALT ; INTERRUPT DID NOT POP CORRECT STATUS 

11113 040634 000005 1$: RESET [CLR NTERRUPT ENABLE 

11114 040636 012706 001000 MOV ABUFF ,%6 ;STACK SET UP 

11115 040642 012767 040666 137214 MOV ATTY4,64 : INTERRUPT M1 

11116 040650 005067 137212 CLR 66 ;CLR NEW STATUS 

11117 040654 012767 000157 137114 MOV #157,STATUS *PROCESSOR STATUS 

11118 040662 105167 136676 COMB TTCSR 7SET INTERRUPT ENABLE 

11119 040666 005767 137104 TTY4: TST STATUS 

11120 040672 001404 BEQ TTT37 

11121 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS === 
11122 ; CONDITIONAL BRANCH INST. AND <==== 
11123 : REPLACE THE MOVE INSTRUCTION ===> 
11124 : WHICH FOLLOWS W/ 720 <==== 
11125 040674 TTY11: 

11126 040674 012742 001140 MOV #1140,~(R2) sMOVE TO MAILBOX # «eeexxex 1140 eenenne 
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11127 040700 005242 INC -(R2) sSET MSGTY® TO FATAL ERROR 

11128 040702 000000 HALT zs INCORRECT STATUS,OR WRONG STSTNM 

11129 040704 105167 136654 TTT37: COMB TTCSR 

ie 040710 NODL3: 

11132 Iti sir i irri iP tttttitTTTT TT TTI Titi TiTiLiTiTiTiTLTTLILTLLLITLT LLL TTL iit) 
11133 S TEST 403 TEST THE ‘WAIT’ INSTRUCTION 

11134 tet itis itis tiie rit ii ittc ttt tet iti Titi i Ti TititiLiTiTiTTTTTTLTTTTTTTiTTiiTy 
11135 040710 005212 TS403: INC (R2) ;UPDATE TEST NUMBER 

11136 040712 022712 000403 CMP #403, (R2) SEQUENCE ERROR? 

11137 040716 001062 BNE STP4 “BR TO ERROR HALT ON SEQ ERROR 

11138 040720 122767 000001 137372 CMPB #APTENV, SENV ;RUNING IN APT MODE? 

11139 040726 001003 BNE 1$ :IF NOT, DO THIS TEST 

11140 005767 137352 TST $PASS 31S THIS THE FIRST PASS? 

11141 040734 001057 BNE STP4E ;IF NOT FIRST PASS, SKIP TEST 

11142 040736 1$: 

11143 040736 042767 000100 136620 BIC #100, TPS ;CLEAR INTERRUPT ENABLE 

11144 040744 012706 001000 MOV #BUFF ,SP sSET UP THE STACK 

11145 040750 012767 041036 137106 MOV AWATE 64 ;SET UP THE INTERRUPT VECTOR 

11146 040756 005067 137104 CLR 66 

11147 040762 105767 136576 WATE1: TSTB TPS ;WAIT FOR READY 

11148 040766 100375 BPL WATE1 ;TO BE UP 

11149 040770 012767 000015 136570 MOV #15,1TPB :DO0 A CARRIAGE RETURN 

11150 040776 105767 136562 WATE2: TSTB TPS ;WAIT FOR READY TO COME UP 

11151 041002 100375 BPL WATE2 

11152 012767 000015 136554 MOV #15,TPB 3DO ANOTHER CARRIAGE RETURN 

11153 041012 052767 000100 136544 BIS #100,TPS sSET THE INTERRUPT ENABLE 

11154 041020 005067 136752 CLR STATUS ; CLEAR THE PSW 

11155 041024 000001 WATE3: WAIT WAIT FOR THE INTERRUPT 

11156 041026 012742 001143 MOV #1141,-(R2) [MOVE TO MAILBOX # ‘*xeexwee 114] xeennnn 

11157 041032 005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 

11158 041034 000000 HALT “WAIT INSTRUCTION DID NOT LOOP 

11159 041036 005767 136734 WATE: TST STATUS ;IS THE PSwW CORRECT? 

11160 041042 001404 BEQ 1$ 

11161 : TO SCOPE: CLEAR THE RIGHT ot OF THIS <==== 
11162 F; CONDITIONAL BRANCH INST. AND ==== 
11163 2 REPLACE THE Bey INSTRUCTION <zz22 
11164 3 WHICH FOLLOWS W/ 725 <==== 
11165 041044 012742 001142 MOV #1142,-(R2) sMOVE TO MAILBOX # crete 1142 wxeneee 

11166 041050 005242 INC -(R2) sSET MSGTYP TO FATAL ERROR 

11167 041052 000000 HALT “NEW PSW SHOULD HAVE BEEN ZERO 

11168 041054 026727 137714 041026 1$: CMP BUFF~4 ,#WATE3+2 ;I1S THE OLD PC SAVED 

11169 041062 001404 BEQ STP4E 

11170 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
11171 2 CONDITIONAL BRANCH INST. <==== 
11172 3 REPLACE THE MOVE INSTRUCTION <==== 
11173 ; WHICH FOLLOWS W/ 715 <s=s= 
11174 041064 STP4: 

11175 041064 012742 001143 MOV #1143,-(R2) sMOVE TO MAILBOX # «eexxne 1143 xennnee 

11176 041070 005242 INC -(R2) zSET MSGTYP TO FATAL ERROR 

11177 041072 000000 HALT ;0LD PC WAS NOT SAVED OR WRONG $STESTN 

11178 041074 STP4E: 

11179 AAI IIIIOIUIUIIIOIOI IOI III IOUT ER EERE EERE EE EEE EEE REE EEE EEE 
11180 ZTEST 404 TEST THAT USING REGISTER ADDR (177700) CAUSES TIME OUT. 

11181 III III III IOI IOUT TORTI TOTO RITE RRR REE RE REE REE ER EEKER ERE RE EE REE R EER EERE 
11182 041074 005212 TS404: INC (R2) ;UPDATE TEST NUMBER 
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041076 922712 000404 CMP #404, (R2) . ZSEQUENCE ERROR? 
041102 001017 BNE TS405-10 ‘ 7BR TO ERROR HALT ON SEQ ERROR 


REGISTER ADDRESS (177700-177717) CAUSE TIME OUT WHEN USED 
zAS PROGRAM ADDRESS BY THE CPU. 


oo 
w 


#BUFF , SP zSET STACK POINTER 
#RETR1,@#RTRAPS: SET TRAP RETURN ADDR 
a#177700 :BAD ADDR REFERENCE, TRAP TO 4 
#1144,-(R2) [MOVE TO MAILBOX # eexxeee 1144 eeenene 
-(R2) :SET MSGTYP TO FATAL ERROR 
HA ZREFERENCING 177700 DID NOT CAUSE TIME OUT 
137634 RETR1: c #PCNI +4 BUFF ~4 [PROPER PC STORED ON STACK? 


TS 

; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 

i CONDITIONAL BRANCH INST. AND 

‘ REPLACE THE MOVE INSTRUCTION 

3 WHICH FOLLOWS W/ 760 
012742 #1145,=(R2) sMOVE TO MAILBOX # x*exewe 1145 xennnne 
005242 -(R2) ;SET MSGTYP TO FATAL ERROR 
000000 ;0LD PC WAS NOT SAVED IN STACK 
; OR SEQUENCE ERROR 


FERRER KEKE REE KKKEEEEEREKKKEEREEEKREKEKEREKRKKEKEK KEK 
ODD ADDRESS USED BY A ‘WORD'' INSTRUCTION SHOULD NOT 
;CAUSE A TRAP, BUT THE LOW ORDER ADDRESS BIT WOULD BE IGNORED. 
FARRER EKKEEEKKEKEREKEKKEKERERKEEEEREREEKEEERKEE EEE EEEEKEEKEEEEEE 
iTEST 405 TEST ODD ADDRESS TRAP 1S NOT IMPLEMENTED. 
FERRIER AKER KR REE KKK KKK EERE EERE ERE EERE RKEK EERE EREREEEE 
005212 78405: (R2) UPDATE TEST NUMBER 
022712 000405 #405, (R2) : SEQUENCE ERROR? 
001013 TS406-10 :BR TO ERROR HALT ON SEQ ERROR 


012737 041210 000004 HRETR2,@ARTRAPS ;SET TRAP RETURN ADDR 
005037 000000 avd :PUT ALL 0 IN LOC 0 

005337 000001 af) sDECREMENT ODD ADDRESS, SHOULD NOT TRAP 
022737 177777 000000 MP #-1,a4#0 WORD LOC 0 HAS ALL ONES? 


001404 TS406 ; 
:; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 764 


012742 001146 MOV #1146,-(R2) sMOVE TO MAILBOX # *xeaxee 1146 eeeeene 

005242 INC -(R2) SET MSGTYP TO FATAL ERROR 

000000 HALT :LOC 0 DID NOT STORE -1,0R ODD ADDR REFERENCE CAUSE TRAP 
: OR SEQUENCE ERROR 


J EAE EEEEKEKKEEEEEEKEEEEEEREREKREEKKKKKKEK 


[USING ADDRESS 177700 IN MODE 2, CAUSES BUS ERROR, BUT 
:THE REGISTER IN USE WILL BE INCREMENTED. 


. 
ARERR REEREKEAEREREEREREEEEE 


STEST 406 TEST THAT IN MODE 2, BAD ADDRESS REFERENCE CAUSES BUS ERROR. 


FERRE ERE REE EEE EEE EKER KERR EEE EERE EERE EERE ERE KEKE RERREEEREERER EEE 


PCN1: 


RRRRRRRK 


ee eee 
Od ed od od 
Ok ed ad ed ed 
SWWwNN 
SEYSRVASR 


BELKSRALVLESELRAR 


GRORSS 


83 


oa vn 
a &n% 


pep as Po ee 
ee ee 
KSSH S 


RRRRR RRR 
Mery 


AAAA 
“uuu 
nundu 


PN NE Nt Net Nt ANd No o-oo pl 3 
NORRIS SONAARWW=OS 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


Nm 
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T8406: ;UPDATE TEST NUMBER 

000406 CMP #206 (R2) ; SEQUENCE ERROR? 

BN 407-10 7BR TO ERROR HALT AON, SEQ ERROR 
951628 000004 3SET TRAP RETURN AD 

00 Al RO zSTORES BAD MEMORY REFERENCE 
“BAD + REFERENCE, FRAP TO LOC 4 
#1147, -(R2) ‘MOVE T MAILBOX # ry 1147 xeexene 
-(R2) 3SET MSCTYP TO FATAL ERR 

HA S ADDRESSING 177700 DID NOT CAUSE TRAP 

177702 : > oo ;WAS RO INCREMENTED? 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE ype tata 


: WHIC 
012742 #1150,-(R2) MOVE TO MAILBO 1150 «keene 
005242 ~(R2) :SET MSGTYP TO FATAL ERROR 
000000 zRO_ WAS NOT INCREMENTED 

; OR SEQUENCE ERROR 


Fh alalalaelebalaiatedebabaiaioeteieieisbebebleieiaiebeeielaisieicieisisisicioisisieioiieiobaiebeietabiaioi 
TAFTER THE FIRST BUS ERROR WAS ENCOUNTERFD, AN ATTEMPT WAS MADE 
:TO PUSH PC R 


- A BOUBLE BU THE STACK POINTER WOU 
THEN BESET TO LOCATION 4, OLD PC AND PS WERE PUSHED INTO 
ait S 0 AND 2. THE PROCESSOR WOULD TRAP TO 4 AND CONTINUE 


TEBE EIEIO OSES OSI IOOSU ISU ODE tE it itiiiintrinniniens 
[TEST 407 TEST FOR DOUBLE BUS ERROR. 
a Mr <. ae Oe, eee GES OME co ee 
TS407: (R2) ;UPDATE TEST NUMBER 
000407 C #407, (R2) : SEQUENCE ERROR? 
TS410-10 ‘BR TO ERROR HALT ON SEQ ERROR 
041362 ZSET TRAP RETURN ADDR 
000340 40 ars Pp 


0 ZSET UP 
041352 SET TRAP RETURN ADDR 
000340 000012 #340, an12 [SET UP P 

177700 #340,041 SP SET TLLEGAL SP 

: S ILLEGAL INSTRUCTION 
001151 #1151,-(R2) SMOVE TO MAILBOX # eeexxee 115] xeeeeee 
« (R2) [SET MSGTYP TO FATAL ERROR 
[DOUBLE BUS ERROR DID NOT CAUSE TRAP 


012742 001152 #1152,-(R2) sMOVE TO MAILBOX # xeeeewe 81152 xennnne 
005242 ~(R2) SET MSGTYP TO FATAL ERROR 

000000 HA a¥ TO WRONG LOCATION 

022737 041342 000000 : MP A#DBE+2,a4#0 SOLD PC GOT SAVED? 
001404 B DBE3 


; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
; CONDITIONAL BRANCH INST. AND 
REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 744 
012742 001153 #1153,-(R2) :MOVE TO MAILBOX # eter 1153 teens 


005242 ~(R2) :SET MSGTYP TO FATAL ERROR 
000000 SOLD PC DID NOT GET SAVEDD 


Nm 

* 

Oo 
AAAA 


MMNNNNNnonononry 


Roe 


Ra 


2 
2 
2 
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2 
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PERSE 
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CJKDBB.P11 19=JUN=79 10:52 T407 TEST FOR DOUBLE BUS ERROR. SEQ 0223 
11295 041402 022737 000340 000002 DBE3: CMP #340,a42 ;CORRECT PS SAVED? 

11296 041410 001404 BEQ DBES 

11297 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
11298 é CONDITIONAL BRANCH INST. AND <==== 
11299 ; REPLACE THE ype INSTRUCTION <sss2 
11300 : WHICH FOLLOWS W/ 734 <s=s2 
11301 041412 012742 001154 MOV #1154,=-(R2) sMOVE TO MAILBOX # jancoen 1154 «eeeeee 

11302 041416 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

11303 041420 000000 HALT CORRECT PS DID NOT GET SAVE 

11304 041422 022706 000000 DBES: CMP #0,SP :SP POINTS TO LOC 0? 

11305 041426 001404 BEQ DBES 

11306 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
11307 é CONDITIONAL BRANCH INST. AND <==== 
11308 3 REPLACE THE MOVE INSTRUCTION <==== 
11309 : WHICH FOLLOWS W/ 725 ==== 
11310 041430 012742 001155 MOV #1155,=-(R2) sMOVE TO MAILBOX # «xeexewe 1155 Keennne 

11311 041434 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

11312 041436 000000 HALT 3SP IS NOT POINTING TO LOC 0 

Aiez 041440 012706 001000 DBES: MOV #STBOT,SP sRESET SP 

11315 

11316 DI IIIT IIIT III IA IAI IAI AAI IIS IIIA AAAI IAI IASI SISISIMIIINSIMNNAAINANSNANASANN I A 
11317 sTEST 410 TEST MFPT 

11318 III IOI IOI III IIS III I III III III IAAI III III III ISI IISI IIIA III MANS NANANANE A A 
11319 041444 005212 TS410: INC (R2) ;UPDATE TEST NUMBER 

11320 041446 022712 000410 CMP #410, (R2) ; SEQUENCE ERROR? 

11321 041452 001023 BNE TS411-10 “BR TO ERROR HALT ON SEQ ERROR 

11322 ; THIS 421m +d MFPT INSTRUCTION- MOVE FROM PROCESSOR TYPE 

11323 [UPON EXECU e. WILL RECEIVE THE PROCESSOR MODEL CODE 

11324 sWHICH IS YO00003" OR Fil. 

11325 000007 MFPT=000007 

11326 041454 012706 001000 MOV ASTBOT,R6 sINIT. SP 

11327 041460 013746 000010 MOV a#10,-(SP) SAVE. TRAP VECTOR 

11328 041464 012737 041514 000010 MOV #1$,a410 ;SET UP ILLEGAL INSTRUCTION TRAP 

11329 041472 010046 MOV RO,-(SP) [SAVE R RO 

11330 041474 000007 MFPT :GET PROCESSOR MODEL 

11331 041476 010037 041524 MOV RO, a@4CPUTYP sSTORE IT 

11332 041502 012600 MOV (SP)+,RO SREST ORE RO 

11333 041504 022737 000003 041524 CMP #3, a4CPUTYP ;CHECK MODEL TYPE 

11334 041512 001405 BEQ XXT 

11335 ; TO SCOPE: CLEAR THE RIGHT BYTE OF THIS <==== 
11336 : CONDITIONAL BRANCH INST. AND <==== 
11337 ; REPLACE THE MOVE INSTRUCTION <==== 
11338 : WHICH FOLLOWS W/ 757 <sz2= 
11339 041514 1$: 

11340 041514 012742 001156 MOV #1156,-(R2) sMOVE TO MAILBOX # *eeeneee 1156 txenene 

11341 041520 005242 INC -(R2) ;SET MSGTYP TO FATAL ERROR 

tes 041522 000000 HALT ; ILLEGAL INSTR TRAP OR WRONG MODEL TYPE 

11344 041524 000000 CPUTYP: .WORD 0 

11345 041526 XXT: 

11346 041526 012637 000010 MOV (SP)+,a4#10 ;RESTORE TRAP VECTOR 

11347 DISSE OSSD IISIIIOO OOO IIDIOOOIOINIIUDO OR iiitioiit itt 

11348 THIS TEST WILL CHECK THE SERVICE ROUTINE FOR A CONTROL CHIP ERROR. 

11349 ;THIS IS DONE BY Bie INSTRUCTIONS WHICH JUMP TO NON-EXISTENT 

11350 * CONTROL~ CHIP, ON THE KDF11-A, THIS INCLUDES: FIS(CTL3), CIS AND wCS 
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CJKDBB.P11  19=JUN-79 10:52 1410 TEST MF : SEQ 0224 
11351 zINSTRUCTIONS. A CTLERR TRAPS TO LOCATION 10. 

11352 :THE RESET LINE IS ALSO ASSERTED FOR 1 CYCLE. 

11353 FERRARA EERE ERE EERE KEE REE EKEREREEEEERERED 
11354 STEST 411 TEST CTLERR SERVICE ROUTINE 

11355 FERRER REE EEE EEE REE EEE EERE REE ERE RER EERE EEE 
11356 041532 005212 T8411: INC (R2) :UPDATE TEST NUMBER 

11357 041534 022712 000411 CMP #411, (R2) s SEQUENCE ERROR? 

11358 041540 001022 BNE TS412=10 [BR TO ERROR HALT ON SEQ ERROR 

11360 041542 012706 001000 MOV #STBOTR6 yINIT STACK POINTER 

11361 041546 012737 041566 000010 MOV #1$,a410 ;SET UP RETURN ADDR FROM TRAP 

11362 041554 012737 000340 000012 MOV #340,a412 :SET TRAP PRIORITY=7 

11363 041562 075008 FADD  R6 ZEXECUTE FIS INSTR..SHOULD CAUSE CTLERR 

11364 041564 000000 HALT [DID NOT TRAP..CHECK CSEL LINE 

11365 041566 012737 041600 000010 1$: MOV #2$,a410 :SET UP RETURN ADDR Ee ROM TRAP 

11366 041574 076000 76000 ZEXECUTE CIS INSTR..SHOULD TRAP 

11367 041576 000000 HALT “DID NOT TRAP 

11368 041600 012737 041612 000010 28: MOV #3$,a#10 :SET UP RETURN ADDR FROM T 

11369 041606 076700 76700 sEXECUTE™ WCS INSTR..SHOULD CAUSE CTLERR AND TRAP 
11370 041610 000000 HALT 

11371 041612 012706 001000 3$: MOV ASTBOT,R6 “RE-INIT STACK POINTER 

11373 SKIKE RRR KEKE KEKE KR REE KEE KEK EERE EEE REE EEKEKKEEE EK 
11374 [TEST 412 TEST THAT ALL RESERVED INSTRUCTIONS TRAP 

11375 ate mar” made aoe eeee Seeman ae eee 
11376 041616 005212 TS412: INC :UPDATE TEST NUMBER 

11377 041620 022712 000412 CMP #042, (R2) :SEQUENCE ERROR 

11378 041624 001112 BNE RETS “BR TO ERROR mt ON SEQ ERROR 

11379 041626 042767 000100 135730 BIC #100, TPS 

11380 041634 012737 041662 000244 MOV ATRAP244 ,a#244 ; SET UP TO SEE IF 

11381 041642 013767 000010 000024 MOV @#10,TENSAVE : THIS PROCESSOR HAS THE 

11382 041650 012737 041672 000010 MOV ATRAP10,a#10 : FLOATING POINT OPTION 

11383 041656 170007 .-WORD 170007 ; AN ILLEGAL FPP INSTRUCTION 

11384 041660 BR AROUND + THE FOLLOWING 

11385 041662 TRAP244: : IF FPP IN-- 

11386 041662 013767 042114 000234 MOV QAFPP,FINISH ; RESET END OF TABLE POINTER 

11387 041670 000002 RTI > AND RETURN 

11388 041672 TRAP10: ; LEAVE THE TABLE ALONE 

11389 041672 000002 RTI > AND RETURN 

11390 041674 000000 TENSAVE:.WORD 0 t A PLACE TO STORE CONTENTS OF 10 

11392 041676 AROUND : : CONTINUATION POINT 

11393 041676 012737 000246 000244 MOV #246, 4244 t RESTORE THE TRAP VECTOR 

11394 041704 016737 177764 000010 MOV TENSAVE,a#10 : RESTORE THE ILLEGAL INST. VECTOR 

11395 041712 012703 042074 MOV ATABLE,T ; TABLE POINTER 

11396 041716 012305 GIN1: MOV (TAB)+,FIRST | :FIRST OR CURRENT INSTRUCTION 

11397 041720 012301 MOV (TAB) +, LAST [LAST INSTRUCTION OR GROUP 

11398 041722 020567 000176 CMP FIRST, FINISH sTESTED ALL 

11399 041726 001415 BEQ GIN3 SYES BRANCH 

11400 041730 010567 000172 MOV FIRST, INST :SET UP INST 

11401 041734 005267 000166 GIN2: INC INST 

11402 041740 012767 042006 136042 MOV #RET,10 :SET UP RETURN FROM TRAP 

11403 041746 012706 001000 MOV ABUFF ,SP SET UP STACK SOUTER 

11404 041752 005067 136020 CLR CC [CLEAR PRIORITY 

11405 041756 000167 000144 JMP INST Z EXECUTE RESERVED INSTRUCTION 

11406 041762 012737 062234 000034 GIN3: MOV #STRAP, a#34 “TRAP VECTOR FOR TRAP CALL 


. = 
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041770 012737 000340 000036 MOV #340, 0436 sLEVEL 7 
041776 012700 MOV #370,R0 sRESET RESERVED AREA 370-402 
042002 000167 JMP THRPRT ; JUMP TO EIS TEST 


; TRAPPING SHOULD SEND YOU HERE 
RET: CMP SP , ABUF F =4 


B® 


TEST DECREMENT OF SP 


RET1 
#1157,=(R2) sMOVE TO MAILBOX # seeeeee 1157 senneee 
-(R2) ;SET MSGTYP TO FATAL ERROR 
sWRONG DECREMENT 
136744 042130 RET1: a eee ;LOC OF INST UNINCREMENTED 


001160 #1160,=(R2) sMOVE TO MAILBOX # seeneee 1160 «eenene 
-(R2) :SET MSGTYP TO FATAL ERROR 
: INST INC ON TRAP 


el ee ad nd ed 


a oe es os SS SY) SH 


136726 : BUFF =2 
RET3 


FWN-OVONOUS WO 


SURVS 


: TO SCOPE: CLEAR THE RIGHT BYTE OF THIS 
: CONDITIONAL BRANCH INST. AND 
: REPLACE THE MOVE INSTRUCTION 
: WHICH FOLLOWS W/ 665 


001161 ‘ #1161,-(R2) sMOVE TO MAILBOX # eee 116] eenenee 
~(R2) [SET MSGTYP TO FATAL ERROR 
= CONDITION CODES SET ON TRAP OR WRONG $TSTNM 


000040 : INST LAST 
GIN1 :SET UP NEW GROUP 
177640 GIN2 FINISH OLD GROUP 
END OF INSTRUCTION GROUP 
zEND OF OPERATE 


:RTS,RT1,JMP 


SEER RKRRKRKSRE RRR EES 


Mronr 
ONOW 


BERR RRRR ERE 


BSREIKARAYSSS 


RERARSR 
RR 
=o 


: START OF THE FPP INSTRUCTIONS 


FINISH: sEND FLAG 

INST: | sWILL CONTINUE RESERVED INST 
;SHOULD TRAP TO LOC 10 

oh 10 SHOULD SEND YOu TO 


HALT 
-SBTTL ** STARTING OF EIS TEST ** 
-REPT 0 


- PAGE 
PART THREE: EIS INSTRUCTION TESTS 
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ABSTRACT 


THIS PROGRAM TESTS THE F11 EXTENDED INSTRUCTION SET 
<ASH, ASHC, MUL, AND DIV> USING REGISTERS 0-5, AT- 
LEAST ONCE WITH EACH INSTRUCTION. 


SWITCH SETTINGS 


IF NO HARDWARE SWITCH REGISTER IS ee the" THE PROGRAM 
AUTOMATICALLY USES THE CONTENTS OF LOC. 176 AS THE SOF TWARE 
SWITCH REGISTER. THE USER SHOULD SET THIS LOCATION BEFORE 
STARTING THE PROGRAM. 


BIT # OCTAL VALUE FUNCTION 


15 100000 HALT ON ERROR 
13 020000 INHIBIT ERROR PRINTOUT 


AN 8 BIT BYTE SENVM [I.E. LOCATION 321] HAS BEEN USED TO DEFINE 
THE OPERATING MODE. ALL TYPEOUTS CAN BE SUPPRESSED BY MAKING 
Oi tiie gyre SENVM HIGH, IN OTHER WORDS BY PLACING A 20000 IN 


MD .MC , CND 
ME 





CJKDB=8 DCF1i-AA CPU_DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


RAV283 


M“SSS3333yssy35 
wi 


SSRIE 


NMNNNMNNN 2 2 A 2 oe ee 
NOUSWN—OOONAUSWR— 


eR tet Ve pe ge pe es AIDA A LMA MANN NDA 
MI OGWNAARGA AOORNOURUD IS Ooo 


rE ED EY De title et tpt hye tthe tp 


MMA REAR RALR 


$TPB 


$TPS: 
020040 000040 $CRLF: 
047520 042527 POWER: 


H 2 
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** STARTING OF EIS TEST ** 


-=COUNT+2 
-=PSWORD+2 
-=TEMP1+2 
-=TEMP2+2 
.=TEMP3+2 


: 6 
177566 


177564 
eASCIZ <15><12>/ / 
eASCIZ <12><15>/POWER/ 


SEQ 0227 


I 2 
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CJKDBB.P11 19=JUN=79 10:52 ** STARTING OF EIS TEST ** SEQ 0228 


11555 


2 
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CJKDBB.P14 19=JUN=79 10:52 STARTING OF EIS TEST ** SEQ 0229 


THRPRT : 


012705 000304 MOV ASTESTN,RS sMAKE RS POINT TO THE LOCATION $TESTIN 
005037 @A4 COUNT CLEAR THE COUNTER 
#1,(R5) INITIALIZE TEST NUMBER 
#STBOT,SP :** STACK AT STBOT ** 
a4 ,-(SP) : SAVE ERROR VECTOR 
a46 ,~ (SP) 3 
135504 MOV #1$,4 SET UP TIMEOUT VECTOR 
@SWR TRY TO REFERENCE HARDWRE SWR 
c BR 3$ BRANCH _IF NO TIMEOUT TRAP OCCURS 
177676 «18: #SWR sPOINT TO SOFTWARE SWR 
177672 ADISPREG, DISPLAY’ sPOINT TO SOFTWARE DISPLAY REG 
2 (SP)+ ;RESTORE STACK 
3$: 6 RESTORE ERROR VECTOR 


4 “PLACE #0 IN PSW 
000320 sARE WE UNDER APT ? 

2$ :IF NOT THEN GO TO 2$ 
177634 ASSWREG , SWR SUSE APT SWITCH REGISTER 
042144 : A A ga :TEMP1=1 


a4 TEMP 
000001 042150 #1 ,QATEMPS ; 
005037 042152 a4 TEMPS ; TEMP4=0 


4 


kB kk i a dd = J 


* 


Mvinny 
OONAWN 


1 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
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CyKDBB.P11 19=JUN=79 10:52 ASH INSTRUCTION TESTS SEQ 0230 
11580 

11581 LARA AARERRERRERERERREREEREEE 

11 : ASH INSTRUCTION TESTS 

11583 FRARAAERAARAARRAERAERREEREREEKKEKE 

11584 

11585 

11586 

11587 

11588 PERKKRRRKER ER 

11589 ; TESTS 1-36 

11590 PRRKKRRER RRR 

1138 

11593 042402 010767 135564 ASTART: MOV PC,LPADR Hptny ERROR LOOP ADDRESS 

11594 042406 013700 042144 MOV QA TEMP ,X%0 OAD RO WITH THE CONTENTS OF TEMP’ 

11595 042412 032737 000001 000306 BIT #1 , #SPASS ‘Is IT_AN EVEN + -¥ 

11596 042420 001004 BNE 2$ 31F NOT THEN GO 1 0 28 

11597 042422 013701 042146 MOV @ATEMP2 ,R1 ; OTHERWISE eye # THE INSTRUCTION 

11598 :IN MODE 0 USING R 

11599 042426 072001 ASH R1,R0 

11600 042430 000402 BR 4$ 

11601 042432 072067 177510 2$: ASH TEMP2 ,%0 zSHIFT RO BY THE NUMBER SPECIFIED BY TEMP2 
11602 042436 106737 042142 4$: MFPS a4PSWORD sSAVE PS 

11603 042442 123737 042152 042142 CMPB @ATEMP4 ,AWPSWORD: IS THE PS = TEMP4 ? 

11604 042450 001403 BEQ +1 

11605 042452 004767 016050 JSR PC,$HLT;SEEN AN —~ GO TO THE HALT ROUTINE 

11606 PS IS NOT EQUAL TO 0 

11607 042456 000001 1 :T0 scope. TREPLACE LAST: BEQ .+10 (001403) 

11608 ;BY (013746 000172 000207) 

11610 042460 005237 042140 INC a4 COUNT : INCREMENT THE COUNTER 

11611 042464 023700 042150 ; CMP aA TEMPS, %0 21S THE RESULT IN RO FQUAL TO TEMP3? 

11612 042470 001403 BEQ -+10 

11613 042472 6$: 

11614 042472 004767 016030 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

11615 EITHER INCORRECT RO OR INCORRECT SEQUENCE 
11616 042476 000002 2 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 

11617 :BY (013746 000172 000207) 

er 042500 021537 042140 CMP (R5) , a@#COUNT :IS i NUMBER EQUAL TO THE 

11621 042504 001372 BNE 6$ ‘TF NOT GO TO THE HLT ABOVE 

11622 042506 005215 INC (R5) 

11623 042510 010767 135456 MOV PC,LPADR zSTORE ERROR LOOP ADDRESS 

11624 042514 021527 000037 CMP (R5) #37 ;HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT 
11625 BY 14. AND RIGHT BY 14.? 

11626 042520 002011 BGE 

11627 042522 005237 042146 INC @ATEMP2 

11628 042526 006367 177416 ASL TEMPS zSHIFT TEMP3 _L 

11629 042532 021527 000020 CMP (R5) ,420 HAS THE CONTENTS” OF REGISTERS BEEN SHIFTED LEFT BY 14.? 
11630 042536 001004 BNE REGR1 

11631 042540 000167 001010 JMP NEGAT :IF SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
11632 042544 004767 001032 8$: JSR PC, TST37 :IF SO GO AND CONTINUE - REST OF THE PROGRAM 
11633 042550 010767 135416 REGR1: MOV PC,LPADR ; STORE ERROR LOOP ADDRESS 

11634 042554 013701 042144 MOV @ATEMP1 ,%1 ;LOAD _R1 WITH THE shane OF TEMP1 

11635 042560 032737 000001 000306 BIT #1, a#SPASS 1S IT AN EVEN PASS 


ae 
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2$ :I1F NOT THEN GO [0 2$ 
042146 OATEMP2 ,R2 ZOTHERWISE EXECUTE ASH INSTRUCTION IN MODE 0 
: [USING R1 


BR 
177342 2$: TEMP2,%1 :SHIFT R1 BY THE NUMBER SPECIFIED BY TEMP2 
042142 4$: @APSWORD SAVE PS 

042152 042142 C ot tale @APSWORD: IS THE PS = TEMP4 ? 


015702 BC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; THE PS IS NOT FQUAL TO 0 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


042140 a4 COUNT : INCREMENT THE COUNTER 
042150 QA TEMPS ,%1 IS THE RESULT IN R1 EQUAL TC TEMP3? 


+10 


AXXO 
& 


ad ed ad ed ad ed 
WWW 
DWNRAR WN O00 NOUR WN OD SO 


—SSSSISS SS 


rs 


015662 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
SEI THER INCORRECT R1 OR INCORRECT SEQUENCE 
;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021537 042140 (R5) ,@#COUNT :1S THE TEST NUMBER EQUAL To THE COUNTER? 

001372 6$ :1F NOT GO TO fHE HLT ABOVE 

005215 (R5) 

610767 135310 PC,LPADR :STORE ERROR LOOP ADDRESS 

021527 000037 (R5) ,437 HAS THE CONTENTS OF > a BEEN SHIFTED LEFT 
BY 14. AND RIGHT BY 14. 


oO OO 
AAA AAA CA 


w 
0 


042146 
177250 TEMPS 3SHIFi TEMP3 LEFT 
000020 need HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 14.? 


000642 JMP NEGAT :I1F SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
000664 8$: J IF SO GO AND CONTINUE THE REST OF THE PROGRAM 
135250 : STORE ERROR LOOP ADDPESS 

042144 MO LOAD R2 WITH THE CONTENTS OF 7EMP1 

000001 000306 


$ NO N GO TO 2$ 
042146 OTHERWISE EXECUTE ASH INSTRUCTION IN MODE 0 
s R3,R2 ;USING R2 


SESEEERES 


S3S33S8 
RANISS 


S883 
ONAV 


BR 
177174 : ;SHIFT R2 BY THE NUMBER SPECIFIED BY TEMP2 
042142 4$: PSWORD :SAVE PS 

042152 042142 orTEMPs. @APSWORD:IS THE PS = TEMP4 ? 


015534 bc. $HLT;SEEN AN ERROR, GO TO THE HALT or 
sTHE PS IS NOT EQUAL 7 
;T0 SCOPE REPLACE LAST: BEQ. -+10 (001403) 
:BY (013746 000172 000207) 


042140 a4 COUNT 
042150 wrt} lh :I1S THE RESULT IN R2 EQUAL TO TEMP3? 
.+ 


SESRSERSESS 


oO 
8 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
j 
1 
7 
1 
1 
4 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
4 
1 
1 


ka kk i dk dk ad od 2 od ad 


015514 ; PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 


Lea 
oO 
— 
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sEITHER INCORRECT R2 OR INCORRECT SEQUENCE 
000006 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021537 042140 (R5),@#COUNT 1S THE TEST NUMBER EQUAL TO THE COUNTER? 

001372 6$ [IF NOT GO TO THE HLT ABOVE 

005215 (RS) 

010767 135142 PC, LPADR :STORE ERROR LOOP ADDRESS 

021527 000037 (R5) ,437 :HAS THE CONTENTS OF REGISTERS BEEN SHIFTED 
SLEFT BY 14, AND RIGHT BY 14.? 


oO 


995168 
177102 TEMP3 SHIFTED TEMP3 LEFT 
000020 neon HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 14.? 


000474 J NEGAT :1F SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
000516 8$: ° :1F SO GO AND CONTINUE THE REST OF THE PROGRAM 
135102 : : STORE ERROR LOOP ADDRESS 

042144 MO OAD R3 WITH THE CONTENTS OF TEMP1 

000001 000306 ; SS ? 


3 GO TO 2$ 
042146 SOTHERWISE EXECUTE ASH INSTRUCTION IN MODE 0 
R4,R3 ;USING R3 


SeSeaRe 


BR $ 
177026 : s SHIFT R3 BY THE NUMBER SPECIFIED BY TEMP2 
042142 4$: @APSWORD VE PS 

042152 042142 ct tli @APSWORD;1S THE PS = TEMP4 ? 


015366 bc. $HLT;SEEN AN rg .T TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 
;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
tBY (013746 000172 000207) 


042140 @4 COUNT 
042150 wrt tla 71S THE RESULT IN R3 EQUAL TO TEMP3? 
.+ 


NAVUESWN =O ODONAULWN—O 


NOMOPINONONOND) 2 2 


7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 


N 
Co 


015346 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
SEITHER INCORRECT R3 OR INCORRECT SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


(R5) ,@A#COUNT 71S THE TEST NUMBER EQUAL TO THE COUNTER? 
es) :1F NOT GO TO THE HLT ABOVE 


PC,LPADR + STORE ERROR LOOP ADDRESS 
(R5) #37 HAS_THE CONTENTS OF REGISTERS BEEN SHIFTED 
SLEFT BY 14, AND RIGHT BY 14.? 


USUNYSSS 


ARARAA AAS 


Ww 
N 


8$ 

a4 TEMP2 

TEMPS :SHIFT TEMP3 LEFT? 

hs a HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 14.? 


NEGAT :1F SO GO po NEGAT AND INITIATE RIGHT SHIFT 
004767 00035 8$: J PC, 1ST37 IF SO GG AND CONTINUE THE REST OF THE PROGRAM 
010767 : PC,LPADR >STORE ERROR LOOP ADDRESS 


NRNARRS 
NOUMUSWN OO 


RRR 
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042144 @ATEMP1 ,%4 LOAD R4 WITH THE CONTENTS OF TEMP1 
R5,R1 AVE RS 


MO 3S 
000001 000306 ~° #1 ,QASPASS 71S IT AN EVEN . ? 
$ IF NOT THEN GO TO 2$ 
042146 @ATEMP2 ,RS OTHERWISE EXECUTE ASH INSTRUCTION IN MODE 0 
R5,R4 ZUSING R4 


BR 
176660 2$: TEMP2 ,%4 :SHIFT R4& BY THE NUMBER SPECIFIED BY TEMP2 
042142 4$: aAPSWORD SAVE PS 

042152 042142 MPB et ete ,@4PSWORD;1S PS = TEMP4 ? 


015220 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTHE PS IS NOT EQUAL TO 0 
3;TO SCOPE REPLACE LAST: BE0 -*+10 (001403) 
=BY (013746 000172 000207) 


ca 
NNN NNN NSS 
AADAYS 


042140 a4 COUNT 
042150 wet! tells 31S THE RESULT IN R4 EQUAL TO TEMP3? 
.+ 


NNNNN 
GEAF 


015209 PC, $HLT;SEEN AN Seid GO TO THE HALT ROUTINE 
THER INCORRECT R4& OR INCORRECT SEQUENCE 
:10 SCOPE. REPLACE LAST: BEQ -+10 (001403) 
=BY (013746 000172 000207) 


NNNNNDY 
“Ni 
ANISSS 


R1,R5 sRESTORE R5 
042140 (R5) .@ACOUNT :1S THE TEST NUMBER EQUAL TO THE COUNTER? 


F NOT GO TO THE HLT ABOVE 
(R5) 


134624 PC,LPADR ;STORE ERROR LOOP ADDRESS 
021527 000037 (R5) ,A37 :HAS THE CONTENTS OF REGISTERS BEEN 
aeaens :SHIFTED LEFT BY 14. AND RIGHT BY 14.? 


N 
N 


8$ 
042146 a4TEMP2 
176564 TEMP3 :SHIFT TEMP3 LEFT 
000020 bans #20 sHAS THE CONTENTS OF REGISTER BEEN SHIFTED BY 14.? 


GR5 
BR NEGAT z1F SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
000202 8$: PC, TST37 7IF SO GO AND CONTINUE THE REST OF THE PROGRAM 
134566 : PC. LPADR : STORE ERROR LOOP ADDRESS 


‘ AV 
042144 @A4TEMP1 25 ;LOAD R5 WITH a CONTENTS OF TEMP1 
000001 #1 ,Q#SPASS I E a a 


EN GO TO 2$ 
042146 MOV a4 TEMP2 RO S OTHERWISE EXECUTE ASH INSTRUCTION IN MODE 0 
RO,R5 ;USING R5 


IRARASASII 


NNN 
S8 


4$ 
176510 : TEMP2 ,%5 : SHIFT RS BY THE NUMBER SPECIFIED BY TEMP2 
042142 4$: aAPSWORD P 

042152 042142 CMPB Ort. @APSWORD:1S PS = TEMP4 ? 


015050 pc. $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTHE PS IS NOT EQUAL TO 0. 
:T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


SrErererer ener 
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@4 COUNT 
wrt Selec 71S THE RESULT IN R5 EQUAL TO TEMP3? 
.+ 


SElear 


015030 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;EITHER INCORRECT RS OR INCORRECT SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (0014035) 
:BY (013746 000172 000207) 


021137 042140 (R1) ,@4#COUNT 21S THE TEST NUMBER EQUAL TO THE COUNTER? 
001372 6$ : hesione 5S THE HLT ABOVE 


134454 PC,LPADR STORE ERROR LOOP ADDRESS 

000037 (R5) 437 :HAS_THE CONTENTS OF REGISTERS BEEN SHIFTED 
LEFT BY 14. AND RIGHT BY 14.? 

:I1F SO GO AND CONTINUE THE REST OF THE PROGRAM 


sSHIFT TEMP3 LEFT 
HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 14.? 
:1F SO GO TO NEGAT AND INITIATE RIGHT SHIFT 


Dk ed ed a od 


0 C0 00 C0 C0 Co 00 CO CO Co 
3 Ss 
WONAURBWN Oo 


8s 
042146 a4 TEMP2 
176414 TEMP3 
000020 MP (R5) ,420 

NEGAT 


PISSSVS 


10$ 

: PC, TST37 
: ASTART ;GO BACK TO START 

042144 : #40000, aaTEMP1 : =40000 

042146 #177762 ,a#TEMP2 : 

042150 m #1 ,aATEMPS TEMPS 


ASTART 
(R5) #37 rIS IT TEST 372 
TST40 :IF NOT THEN TRY TEST 40 


a4 TEMP1 : 

042146 #16. ,Q#TEMP2 :SHIFTED BY 16 
a4 TEMPS ;1S=0 

042152 MOV #4 ,QATEMPS zAND PS=4 


C 

(R5) ,440 21S IT_TEST 40? 

TST41 IF NOT THEN TRY TEST 41 
a4 TEMP2 ;0 SHIFTED BY O=0 AND PS=4 


PC 
(R5) 441 ;IS IT TEST 41? 
BNE TST4 ;IF NOT THEN TRY TEST 42 
177760 042146 MOV oo ATES ;0 SHIFTED BY -16.=0 AND PS=4 


000042 : (RS) A4G2 zIS IT TEST 42? 

TST43 ‘IF NOT THEN TRY TEST 43 
100000 #100000, a#TEMP1 :100000 
042146 aeTEMP2 :SHIFTED BY -15 
042150 QATEMP3 :1S=- 
000010 MO #10, aaTEMP4 ZAND PS=10 


000043 : (R5) 443 
TST44 : 
125252 #125252 aa ; 


177777 #-1, a4TEMP . 
152525 MO #152525, aaTEMP3 : 


Ge fade Ce pa ce pe gee 


Sas Sor aa Setetetaes dette tine 


RR 


aleab ahah eabeabea) 
WDNAUSWN—OO0ON 


TEST 43? 
THEN IF NOT THEN TRY TEST 44 


1 
1 
; 
1 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
‘ 
1 
4 
; 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1; 
Fl 
1 
: 
1 
1 
1 
: 
1 
1 
j 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


ek ek dk ed ed ed ed ed ed ad od 


0 00 00 Co Co 00 Co Co Co Co 
Dan 
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021527 000044 TST44: (R5) AGG TEST 44? 

001012 BN TS745 T THEN TRY TEST 45 
18253820"? BY 7 

#3, QATEMPS $=3 


PC 
000045 : (R5) ,445 TEST 45? 

TST46 ;1F NOT THEN ag TEST 46 
177776 


#=2, a4TEMP2 2 SHIFTED BY -2 
165252 042150 #165252, aN TEMPS 252 
000011 #11, a4TEMPG : 


PC 
000046 : A uae 1S IT_TEST 46? 


TST :IF NOT THEN TRY TEST 47 
177777 §=042144 #~1 ,QATEMP1 dl 

000020 042146 #16. ,@ATEMP2 SHIFTED BY 15. 

042150 a4 TEMPS = 


1S= 
000007 042152 #7 ,@N TEMPS SAND PS=7 
000047 : (RS) A467 :IS IT TEST 47? 
BNE sT50 
042146 DaTe : 
100000 042150 MOV #100000, aA TEMP : 
000011 042152 #11 aM TEMP4 : 
000050 : (R5) 450 TEST 50 
53 tI NOT THEN TRY T 


ENT TEST 51 
137777 042144 #137777 ,QATEMP1 ;137777 SHIFTED BY 15. IS=100000 
000013 042152 MOV #13 ,Q4TEMPS SAND PS=13 


PC 
000051 : — 71S IT ENTERING TEST 51? 
.+ 
014340 PC,$HLT;SEEN AN ERROR, GO x aeae ROUT INE 


TEST NUMBER 
;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
*BY (013746 000172 000207) 


000001 
052524 
000003 


SEERERRREE § 


Se ERSEE: 
NQAUSWN =O 


00.00.00 
Ban 


880 
881 
882 
883 
884 
885 
886 
887 
888 
889 
890 


RESTORE STACK POINTER 
177771 


012703 #52.%3 
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3 


FREAK EERE EERE REREREEREE SE 


3TEST:51 11/34 ASH 125252 SHIFTED BY #5 = 52500 PS = 3 


SAREE ERERREEEREREEREEEKEK ERE 


010767 133 TSTS1: PC,LPADR :STORE ERROR LOOP ADDRESS 
#125252,%1 SLOAD R1 WITH 125252 
#5,%1 ‘SHIFT R1 BY #5 
a@4PSWORD sSAVE PS 
#3 @APSWORD :1S THE PS 3? 
4 
014264 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTHE PS IS NOT EQUAL TO 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


022701 052500 #52500,%1 21S THE RESULT 52500? 
001403 -+10 


aad and ad 
8 
W 


004767 014250 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
3R1 IS NOT EQUAL TO 52500 OR INCORRECT SEQUENCE 
000017 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021527 (R5) 451 31S STESTN = #51 
xs) :I1F NOT THEN GO TO HLT ABOVE 


Oo oO 
BVVVVVKVSI922 929290429282 


WO DWN AUSWN =O DONAUSWN oO 


oO 
N 


FERRER EEE KEEEREK EERE EEEREKEEKEEKEEEEEEKKKEK 


sTEST:52 11/34 ASH 125252 SHIFTED BY @S2 = 177525 PS = 10 


FRR EKER ERE KEKE EEK EKER EERE 


010767 133676 TSTS2: C,LPADR STORE ERROR LOOP ADDRESS 
0 LOAD RO WITH 125252 
:SHIFT RO BY aS2 
@APSWORD 2 SAVE PS 
042142 ! be @4PSWORD 21S THE PS 10? 
+ 


014202 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 10 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


177525 ts aes 1S THE RESULT 177525? 
.+ 


BLO ADDOOOO 
‘ Ww 
wYy=S 


014166 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
;RO IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


021527 000052 (R5) #52 z1S $TESTN = #52 
001372 1$ :I1F NOT THEN GO TO HLT ABOVE 
005215 (R5) 


RAARAAEELELLLLRK 


MOMMA lw N Ww 
AERWNUODONONRWN BOOS NOUR 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
7 
1 
1 
1 
1 
1 
1 
F 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 


a kkk i 8k kk a a dt od od a a 


1000 
NO 
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11958 
11959 
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FARRAR AREER AREER EAEEEEREREREERE REE RERAEEEEEEEEERRERERER EKER 


STEST:53 11/34 wi! 125252 SHIFTED BY @#S1 = 177525 PS = 10 


FERRER ERR R SERRE RERRRERAERRERERER AREER REEERE 


010767 TST53: PC,LPADR STORE ERROR LOOP ADDRESS 
0127 MO :Loap RO WITH ete 
see RO BY af 


AVE PS 
#10 @#PSWORD ar THE PS 10? 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
s THE PS 1s NOT EQUAL TO 10 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


— 21S THE RESULT 177525? 
+ 


RB 


SEeSERER 


NNNNNN 
JRARANISS 


NN 


SYsSessssss 
co 


014104 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO 1s NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
370 SCOPE REPLACE LAST: BEQ .+10 (001403) 
‘BY (01 3740 000172 000207) 


021527 000053 (R5) 453 31S STESTN = #53 
001372 1$ ;1F NOT THEN GO TO HLT ABOVE 
005215 (R5) 


3 


SEAR REE REE EKEKEEREREEEEREEEREEREEEKEEEK 


3TEST:54 11/34 ASH 125252 SHIFTED BY (2) = 177525 PS = 10 


FRR ERE RRR EERE EEK EEK ERE REE ER EERE KEE REE 


010767 133532 TSTS4: PC, LPADR ;STORE ERROR LOOP ADDRESS 
125252 MOV wigsese, %0 [LOAD ROWITH 125252 


SHIFT R 
042142 @4PSWORD SAVE PS 
000010 042142 “rae 31S THE PS 10? 


014040 PC, $HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
THE PS IS NOT EQUAL TO 10 
:T0 SCOPE, REPLACE LAST: BEO .+10 (001403) 
=BY (013746 000172 000207 


177525 wee ae 1S THE RESULT 177525? 
+ 


a i kk a 8 ad od oh ad 


SPEER SRLS Et tet tote 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


B88 


014024 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;RO IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


021527 (R5) 454 S STESTN = #54 
001372 1$ 71F NOT THEN GO TO HLT ABOVE 
005215 (R5) 
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12016 
12017 





CJKDB=B DCF11=AA CPU DIAG. 
19=JUN=79 10:52 


CJKDBB.P11 


010767 
012700 


021527 
001372 
005215 


010767 


021527 


001372 
005215 


133452 
125252 


042142 
000010 


013760 


177525 


013744 


000055 


133372 
125252 


042142 
000010 


013700 


177525 


013664 


000056 


MACY11 30A(1052) 


042142 


042142 


H 3 
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ASH INSTRUCTION TESTS 


SEEKER ERE EERE EKEEEERERKEREERE 


STEST:55 


11/34 


ASH 125252 SHIFTED BY (2)+ = 177525 PS = 10 


FERRE EERE ERE KEKE ERERKREREREKEEREEEEEKEEREREEEEREEEREEKERE 


TST55: 


1$: 


PC,LPADR : STORE ERROR LOOP ADDRESS 
#125252, %0 OAD RO WITH 125252 
(2)+,%0 ‘SHIFT R RO BY (2)+ 
aAPSWORD TSAVE PS 

#10,a4PSWORD  :IS THE PS 10? 


+1 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTHE PS IS NOT EQUAL TO 10 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


oe :I1S THE RESULT 177525? 
7 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO § NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
:TO SCOPE, REPLACE LAST: BEO -+10 (001403) 
‘BY (013746 000172 000207) 


(R5) ,455 1S $STESTN = #55 
ess ;1F NOT THEN GO TO HLT ABOVE 


FERRER AREER KEE EKER ERK EKER EKER REE 


7 TEST:56 


11/34 


ASH 125252 SHIFTED BY -(2) = 177525 PS = 10 


FEE RRR KEKE KEKE REE KEE KKK KKKEKEEREEREEEEEREEEEREERREEKEEEEE 


TST56: 


1$: 


PC,LPADR ;STORE ERROR LOOP ADDRESS 
125252 ,20 ZLOAD RO WITH 125252 
-(2),%0 4 po A. BY -(2) 
a@4#PSWORD 


AVE P 
irae Ts THE ps 10? 


PC,$HLT;SEEN AN +e GO TO THE HALT ROUTINE 
THE PS IS NOT EQUAL TO 10 
:T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 000172 000209) 


#177525,20 yIS THE RESULT 177525? 
+ 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO 1S NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
:TO SCOPE. REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 600173" 000207) 


(R5) 456 :I1S STESTN = #56 
ies) IF NOT THEN GO TO HLT ABOVE 


SEQ 0240 


z=. 
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12074 
12075 
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SEEKER EEE 


STEST:57 11/34 ASH 125252 SHIFTED BY 2(3) = 177252 PS = 11 


FERRER REE EERE EKER REKEKEKEEEEERERREEERKEEREKEEEREKEEREREKREEEERE 


010767 133312 TSTS7: PC, LPADR :STORE ERROR LOOP ADDRESS 
012700 125252 MOV #125252,%0 SLOAD RO WITH 125252 
0 000002 2(3),%0 ) 


sSHIFT RO BY 2(3 
042142 @4PSWORD SAVE PS 
000011 042142 #11, Q4#PSWORD 21S THE PS 11? 


+1 
013616 PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
THE PS IS NOT EQUAL TO 11 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


022700 177252 #177252,%0 31S THE RESULT 177252? 
001403 .+10 


004767 013602 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;RO .35 NOT EQUAL TO 177252 OR INCORRECT SEQUENCE 
000033 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


:1S STESTN = #57 
:1F NOT THEN GO TO HLT ABOVE 


3 


021527 000057 (R5) ,457 
001372 1$ 
005215 (R5) 


SRK KR KKK KKK KEKE EERE KR EEK EEKEKEKKEK 


[TEST:60 11/34 ASH 125252 SHIFTED BY a(3) = 177525 PS = 10 


FERRER KEE KEKE KKK RK EEE KEKE EKER KEKE RKEREKEKREKEEKEEEKEEEEE EK 


010767 133230 TST60: PC,LPADR :STORE ERROR LOOP ADDRESS 
MO #125252, %0 ZLOAD RO WITH 125252 
o pecal i BY a(3) 


SWORD :SAVE PS 
042142 ere 1S THE PS 10? 


a 
013534 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 10 
7TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


177525 vit Saad 71S THE RESULT 177525? 
.+ 


013520 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;RO IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


(R5) ,460 21S $TESTN = #60 
a :1F NOT THEN GO TO HLT ABOVE 


12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 
12 


Se ee Tee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee eet 


PUN Sa ahodene 
-—ovo 
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FERRARA EERE REE EEE REREERERREEEERKKEREEE 


:TEST:61 11/34 ASH 125252 SHIFTED BY a(3)+ = 177525 PS = 10 


SERRA EERE REAR RERERRERREERE EERE EEE REE 


010767 133146 TST61: PC, LPADR :STORE ERROR LOOP ADDRESS 

012700 125252 MOV wigsese %0 ‘LOAD RO WITH 125252 
a(3)+,%0 ‘SHIFT RO BY a(3)+ 

042142 oP 


SuORD :SAVE PS 
600010 — 31S THE PS 10? 


013454 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; THE PS IS NOT EQUAL T 0 
:T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


022700 177525 #177525 ,%0 31S THE RESULT 177525? 
001403 -+10 


004767 013440 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO IS NOT EQUAL TO 177528 OR INCORRECT SEQUENCE 
000037 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021527 (R5) ,461 S $STESTN = #61 
001372 1$ : IF NOT THEN GO TO HLT ABOVE 
005215 (R5) 


WWW 


MNES REE REESE 


SAE REE ER EERE EEE ERE AREEKEEREREEREEEKEKER ERE EEEREEEREEERRERKE EK E 


:TEST:62 11/34 ASH 125252 SHIFTED BY a-(3) = 177525 PS = 10 


FREER ERR EERE ERE ERE ERE REE EERE ERE RRR EEE EEE 


010767 133066 TST62: ;STORE ERROR LOOP ADDRESS 
125252 MO W1D505" %0 SLOAD RO WITH 125252 
a-(3) ,%0 SSHIFT RO BY a-(3) 
042142 a4PSWORD 


WOR sSAVE PS 
000010 042142 #10 ,@#P'SWORD :1S THE PS 10? 
013374 PC, $HLT:SEEN AN ERROR. GO TO THE HALT ROUTINE 
THE PS IS NOT EQUAL TO 10 
:10 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


177525 tS 71S THE RESULT 177525? 
+7 


MN 
— 
N 
Ww 


013360 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 
:T0 SCOPE, REPLACE LAST: BEQ -+10 (001403) 
sBY (013746 000172 000207) 


021527 (R5) 462 1S $TESTN = #62 
001372 1$ ;1F NOT THEN GO TO HLT ABOVE 
005215 (R5) 


— 32 SS es os os SS = So os =e 
SLEARATSS 


POPGNPOMPENMOANNNNONNoNoNny 
ed ced ed ce cd ed ee ae ceed eh ened 


Go 
Oo 
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12190 
12195 
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FERRARA ERA 


: ASHC INSTRUCTION TESTS 


PARRA REAR ARRERRKRRARRKRR HE 


-RERRRHKREREKE 


STESTS 63-157 


JERE 


010767 133006 PC, LPADR ;STORE ERROR LOOP ADDRESS 
000062 042140 #62 a4 COUNT 
042144 TEMP1 
042146 


000001 
042150 
042152 
000001 042154 : TEMP5=1 
005037 042156 a4 TEMP6 :0 1 SHIFTED BY 0=0 1, PS=0 
010502 : R5,R2 SAVE R5 
013700 


042144 MO PLACE THE CONTENTS OF TEMP1 IN REGISTER 0 
042146 @ATEMP2,%0!1 PLACE THE CONTENTS OF TEMP2 IN REGISTER 1 


000001 000306 #1, @ASPASS :IS IT _AN EVEN PASS ? 
2s ;IF NOT THEN GO TO 2$ 
042150 QA TEMPS ,R5 : OTHERWISE EXECUTE ASHC INSTRUCTION IN MODE 0 


R5,RO :USIN 
$ 


BR 4 
otis : nag 40 sASHC ~ ari O BY THE CONTENTS OF TEMP3 
042156 042142 arTENPS, ,@4PSWORD; COMPARE PS WITH THE CONTENTS OF TEMP6 


013220 PC, $HLT;SEEN AN eons bo TO THE HALT ROUTINE 


;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


042140 a4 COUNT 
042152 ct” ee -%0 31S THE RESULT IN RO SAME AS TEMP4? 


1 
013200 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG RESULT IN RO 
00004 3 :TO SCOPE, REPLACE LAST: BEO -+10 (001403) 
7BY (013746 000172 000207) 


023701 042154 em :1S_ THE RESULT IN R1 SAME AS TEMPS? 
001403 +10 : TEMP rere tee BY TEMP3=TEMP4 TEMPS 


PS=T 
004767 013164 o PC,$HLT;SEEN AN ERROR . + By ge HALT ROUTINE 
000044 :TO SCOPE, REPLACE LAST: ie -+10 (001403) 
7BY (013746 000172 000207) 


010205 - ZRESTORE R5 
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021537 042140 (R5) -@ACOUNT =: IS_ TEST NUMBER=COUNTER? 
004767 013146 pc! SHLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
:T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 
(R5) 
(R5) ,#160 HAVE THE FIRST 159 TEST BEEN EXECUTED? 
QATEMPS ‘ 
Q4 TEMPS sROTATE TEMPS LEFT BY 1 PLACE 
aATEMPS : INTRODUCE CARRY FROM TEMP4 IN TEMPS 
(R5) #121 ‘IS IT TEST 121? 
REGR23 
R4,RITSH 7IF SO THEN GO AND INITIATE RIGHT SHIFT 
%7. TST160 
P zSTORE ERROR LOOP ADDRESS 


QATEMP1 ,%2 PLACE THE CONTENTS OF TEMP1 IN REGISTER 2 
QATEMP2,%2!1 sPLACE THE CONTENTS OF TEMP2 IN REGISTER 3 


000306 #1 ,QASPASS 1S IT_AN EVEN PASS ? 
IF NOT THEN GO TO 2$ 
@ATEMPS ,R4 OTHERWISE EXECUTE ASHC INSTRUCTION IN MODE 0 
R4,R2 SUSING R2 


BR 4$ 
174460 : TEMP3, = art oe 2 BY THE CONTETNS OF TEMP3 


042142 4$: a@4PSWOR 7 SAV 
042156 042142 CMPB arTEnPs, ,@#PSWORD: COMPARE PS WITH THE CONTENTS OF TEMP6 


013016 PC,$HLT;SEEN AN Sond | TO THE HALT ROUTINE 


WR 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


042140 a4 COUNT 
042152 MP @ATEMPS ,X%2 21S THE RESULT IN R2 SAME AS TEMP4? 


+1 
012776 PC,$HLT: SEEN AN ERROR, GO TO THE HALT ROUT INE 
WRONG RESULT INR 
:T0 SCOPE. REPLACE LAST: -+10 (001403) 
‘BY (013746 000172 000207) 


023703 042154 wok} alata 31S THE RESULT IN R3 SAME AS TEMPS? 
001403 +10 ZTEMPI TEND? SHIF TED BY SEMP3 eT EMpe TEMPS 
004767 012762 PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
WRONG pr gO m R1 
000050 :TO Scope REPLACE : BEQ .+10 (001403) 
“BY (013746 600173" $b00280) 


oer ae 042140 wh . 2 COUNT 31S TEST NUMBER=COUNTER? 
004767 012746 BC, SHUT; SEEN AN —" GO TO THE HALT ROUTINE 
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:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


~ 
Se 


(R5) 
(R5) ,#160 HAVE THE FIRST 159 TEST BEEN EXECUTED? 
@ATEMP3 ° 


Secs 


ohh a sROTATE TEMPS LEFT BY 1 PLACE 
TEMPS : INTRODUCE CARRY FROM TEMPS IN TEMP4 
CR) wi 31S IT TEST 121? 


R4,RITSH :1F SO THEN GO AND INITIATE RIGHT SHIFT 
000244 6$: J %7,1ST160 
132340 : a PC,LPADR eae BR eye LOOP ADDRESS 


R5,R1 
042144 @ATEMP 44 SPLACE THE CONTENTS OF TEMP1 IN REGISTER 4 
042146 QATEMP2,%4!1 SPLACE THE CONTENTS OF TEMP2 IN REGISTER 5 


000001 000306 #1, QASPASS 1S IT_AN EVEN PASS ? 
2$ 3IF NOT THEN GO TO 2$ 
042150 MOV A aaa ; OTHERWISE EXECUTE ASHC INSTRUCTION IN MODE 0 


oR Py 


WNWWWNWWWAN 
pa at Seat Pat nt Sat et et et et 


MNMMNNNNNN—oNofonyoffveroro 
WONAOUSWN Oo 


— eS es SS os SS SS ss Ss SS SS SY ss SS SY 
bs 


BR 
174256 : TEMP3 ,%4 sASHC REGISTER 4 BY THE CONTENTS OF TEMP3 
042142 4$: @A4PSWORD sSAVE PS 
042156 042142 arrows. @APSWORD; COMPARE PS WITH THE CONTENTS OF TEMP6 


012614 Bc, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG PS 


:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


042140 a4 COUNT 
042152 wrt! tale 2&4 IS THE RESULT IN R4 SAME AS TEMP4? 


012574 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
SWRONG RESULT IN R4 
710 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


023705 042154 @ATEMPS , %5 z1S THE RESULT IN RS SAME AS TEMPS? 
001403 .+10 :TEMP] TEMP SHIFTED BY TEMP3=TEMP4 TEMPS 
004767 012560 PC,$HLT;SEEN AN ERROR . 60.10. THE ~" aed ROUTINE 
000054 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 

:BY (013746 000172 000207) 


021137 042140 (R1) ,@#COUNT 71S TEST NUMBER=COUNTER? 
+ 
012544 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 


sNO 
3:70 SCOPE REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 
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010105 RI R5 ZRESTORE R5 
(R5) .4160 save THE FIRST 159 TEST BEEN EXECUTED? 
@ATEMP3 : 


OA TEMPS sROTATE TEMPS LEFT BY 1 PLACE 
@A TEMPS : INTRODUCE CARRY FROM TEMPS IN TEMPS 
aad :IS IT TEST 121? 


R4,RITSH z1F SO THEN GO AND INITIATE RIGHT SHIFT 
%7. TST160 
REGO} 
: (R4)+, (R4)+ yMAKE R4 POINT TO THE NEXT REG TAG 
042144 MO #40000 @AaTEMP1 : TEMP 1=4000 


wv =0 
042150 #-30.,a4TEMP3 : TEMP3=-30 

aA TEMPS ; TEMP4=0 

a4 TEMPS 3 TEMP5=1 


R4 
TST160: (R5) ,4160 4 IT TEST 160 
TST161 F NOT Free TRY TEST 161 
a4 TEMP1 0 0 SHIFTED BY 0 
a4 TEMPS 1S EQUAL TO 
042156 MOV #4 ,QATEMP6 zAND PS=4 


TST161: A Say :IS IT TEST 161 
177746 042150 eal - QA TEMPS 20 0 SHIFTED BY -32=0 0, PS=4 
000162 TST162: a -4162 z:1S IT TEST 162 
1163 IF NOT THEN TRY_TEST 163 

000032 042150 MOV we. a4 TEMPS [0 0 SHIFTED BY 32=0 0, PS=4 
000163 TST163: i) Naa 1S IT_TEST 163? 

TST1 :1F NOT THEN TRY TEST 164 
052525 042144 #50505, aaTEMPI 252525 0 

042150 oes 3 -@4TEMPS =; SHIFTED BY -16. 


MP4 
042154 #52525, ANTEMPS 21S EQUAL TO 0 52525 
a4 TEMP6 S$=0 


a 


SSESESSER 


me ed nd nd nd et od od as = 
WwW 
N 
— 


MMNorenononofernefronofer 


ae 
MEW 


47 
TST164: (R5) ,4164 EST 164? 

TST165 ; THEN Lia TEST 165 
042144 MOV ease oe oa TEw : QO SHITTED BY -16. 


a4 TEMP 
042154 MOV #125252, a4TEMPS ; TO -1 125252 
042156 #10, a4TEMP6 ; 


%7 
TST165: (R5) ,#165 ; ST 165? 
TST166 ; 


afHEN TRY TEST 166 
177777 042144 4-1, a4TEMP1 : FTED BY -16 
177777 042154 MOV 4-1 ,@4TEMPS : QUAL TO -1 -1, AND PS=10 


000166 TST166: (R5) ,4166 ; TEST 166? 
TST167 T THEN TRY TEST 167 
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012737 100000 042144 #100000, ,a#TEMP1 ;100000 0 
01 042150 MO oe TEMP3 > SHIFTED BY -32 IS EQUAL TO =1 <1 
esre EMP6 SAND PS=11 
TST167: (R5) ,4167 sIS IT TEST 167? 
TS 31F 


7170 NOT THEN TRY TEST 170 
aATEMP1 


aA4TEMP2 sQ <1 
042150 #16. ,Q@ATEMPS :SHIFTED BY 16. 
a4TEMPS :1S EQUAL TO -1 0 
Sie sAND PS=12 
TST170: arn IT TEST 170? 


TST T THEN TRY TEST 171 
125252 042146 #125252, aNTEMP? : 252 SHIFTED BY 


NO 
25 16 
125252 042152 MOV 4 taal -@A4TEMP4 31S EQUAL TO 125252 0, AND PS=12 
IT 
NO 
25 
> 


% 
TST171: (RS) #171 TEST 171? 
sTif2 T THEN TRY TEST 172 


MP3 4 SHIFTED BY 15 
042152 #52525, aNTEMPS TO 52525 0 
a4 TEMP6 


47 : 
1ST172: (R5) 64172 1 TEST 172? 


TST1 T THEN TRY TEST 173 
052525 042146 #52525, a#TEMP2 
042150 aATEMPS ED BY 16. IS EQUAL TO 52525 0, AND PS=0 


47 
000173 TST173: (R5) A173 : TEST 173? 
TST174 T THEN TRY TEST 174 


177777 042146 MO #-1 ,AATEMP2 
2150 aATEMP3 


04 SHIFTED BY 15. 
077777 042152 MO 477777 ,AATEMPS 
100000 042154 #100000,a#TEMPS ;1S EQUAL TO 77777 100000, AND PS=0 


000174 TST174: (R5) A174 zI1S IT TEST 174? 
TST175 :IF NOT THEN TRY TEST 175 
100000 042144 MOV #100000, a#TEMP1 
042146 aeTEMP2 3100000 -2 SHIFTED BY 15. 
042154 @ATEMPS tI1S EQUAL TO 77777 0 
000002 042156 #2, a#TEMP6 SAND PS=2 
000175 TST175: (R5) A175 
ENT176 


177777 =042144 


71S IT TEST 175? 
:IF NOT THEN TRY TEST 176 


7-10 
;SHIFTED BY 16. 
TEMP4 71S EQUAL T0 0 0 
042156 #7 ,QATEMP6 AND PS=7 
ENT176: (RS) A176 71S THE PROGRM ENTERING TEST 176? 
011700 Bc, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTEST OOF E 


EST NUMBER G 
;T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 
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12472 
12473 
ieeee 046630 005726 TST (SP) + RESTORE STACK POINTER 
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Sean Sat E deeaeee Gee en ae eee 


:TEST:176 1 SHIFTED BY 8. = 400 PS = 


TIE EE IEE ISS IES IE IE IIS IESE TIE IESE EIU IE ITO EOI IE EEE ites 


010767 131334 TST176: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
000000 MOV ADUMMY , 21 LOAD R1 WITH DUMMY 
000001 #1,%41!1 LOAD R1!1 WITH 1 


000010 ° = SHIFT R1,R1!1 BY 8. 
042142 :SAVE PS 
000000 042142 MPB O. 71S THE PS 0? 


0 
011632 PC, $HLT;SEEN AN ce “7 TO THE HALT ROUTINE 
sTHE PS IS NOT EQUAL TO 0 
;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


000400 weoRe *1 21S THE RESULT 400? 


011616 Bc, Meat: SEEN AN ERROR, GO TO THE HALT ROUT INE 
1s NOT EQUAL TO 4 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


021527 000176 (RS) #176 :1S STESTIN = #176? 
001403 +10 sIF NOT THEN GO TO HLT 
004767 011602 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTEST IS IN WRONG SEQUENC 
000061 :TO SCOPE, REPLACE LAST: BEQ NAO (001403) 
:BY (013746 000172 000207) 


005215 (R5) 


Dee a re a ee 


STEST:177 ~1 SHIFTED BY 15. = 100000 PS = 11 


+ ARRRERRERERERREREEREREERERERERRRERER RRR RARER ERR REE RRR RR EERE ERE 


010767 131236 TST177: MOV PC,LPADR : STORE grt LOOP ADDRESS 
0 MOV ;LOAD R3 W DUMMY 
177777 ehd. ; LOAD R3!7 MuITH -1 


4 Aaa BY 15. 


000017 
042142 @APSWORD 3: SAVE 
000011 042142 MPB #11, a4PSWORD 31S THE PS 11? 


u 
011534 PC,$HLT;SEEN AN ERROR, °° TO THE HALT ROUTINE 
THE PS IS NOT EQUAL TO 11 
:T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


100000 wi GQ000. 243 i1S THE RESULT 100000? 


011520 PC, $HLT;SEEN AN ERROR, GO_ TO THE HALT ROUTINE 
R3 1S NOT EQUAL TO 100000 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
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AH 
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000177 
011504 
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sBY (013746 000172 000207) 


CMP (R5), #177 :1S STESTIN = #177? 
BEQ +10° :1F NOT THEN GO TO HLT 
JSR PC,$HLT: SEEN AN ERROR, GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUENCE 
64 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


SEQ 0253 
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010767 


022701 
001403 
004767 


131140 
000000 
052525 
000000 
042142 
000000 
011434 


052525 
011420 


000200 
011402 


131036 
000000 
020010 
177763 
042142 
000000 


011334 


000101 
011320 


MACY11 30A(1052) 
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042142 
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FARRER KERR RRR REE ERE KEEEKKEEEEEEEREK ERK 


TEST: 200 


52525 SHIFTED BY 0 = 52525 PS = 0 


FARRER EERE EKER REE KERR REE KEE 


TST200: MOV 
MOV 


ae PSAVE RS LOOP ADDRESS 

ADUMMY , 25 ;LOAD R5 WITH 

#52525,%5!1 sLOAD R5!1 WITH 152525 

#0,%5 : SHIFT a R5!1 BY 0 

@4PSWORD SAVE P 

— 71S THE ps 0? 

PC,$HLT;SEEN AN tg GO TO THE HALT ROUTINE 
3TH IS NOT EQUAL 


TO 
:T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


tS ie 245 1S THE RESULT 52525? 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
:R5 IS NOT EQUAL TO 52525 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 000172 000207) 


e 


;RESTORE RS 
tRS). #200 s1S $ = #200? 


:IF NOT THEN GO TO HLT 
PC, $HLT; SEEN AN ERROR, GO TO THE HALT a 
sTEST IS IN WRONG SEQUENC 
:TO SCOPE, REPLACE LAST: BEQ - (001403) 
“BY (013746 000172 000207) 


(R5) 


NN gana taal +o gett ela tnt 


STEST:201 


20010 SHIFTED BY -13. = 101 PS = 


+ eeeneneeererennererenraseeeeenenegranneneneeenanenaeresaeeeeeseeeeees 


TST201: MOV 


PC,LPADR ; STORE ac LOOP ADDRESS 
ADUMMY , £1 [LOAD R1 WITH DUMMY 
#20010,.%1!1 SLOAD R1!1 WITH 20010 
#-13.,%1 :SHIFT R1,R1!1 BY -13. 
a4PSWORD ZSAVE PS 
re :IS THE PS 0? 
PC,$HLT;SEEN AN re “7 TO THE HALT ROUTINE 
S IS NOT EQUAL TO 
:TO scoré epad E LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 
10r, 41 zIS THE RESULT 101? 


Bc. $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 


SEQ 0254 
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CJKDBB.P11 


047224 


000071 


021527 
001403 
004767 


000072 


005215 


000201 
011304 


J 4 
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71 


CMP 
BEQ 


72 


IS NOT EQUAL TO 101 
:T0 scope. TAPIACEL BEQ .+10 (001403) 
“BY (013746 600173" $0020") 


(R5) 4201 :1S $TESTN = #201? 
+10° :IF NOT THEN GO TO HLT 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTEST IS IN WRONG SEQUENC 
:TO SCOPE, REPLACE LAST: BEQ NSA0 (001403) 
“BY (013746 000173 000207) 


SEQ 0255 
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010767 


130740 
000000 
177777 
000020 
042142 
000011 
011236 


000000 
011222 


000202 
011206 


130642 
000000 
000001 
177777 
042142 
000001 
011136 


100000 
011122 


MACY11 30A(1052) 


042142 


042142 
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ASHC INSTRUCTION TESTS 


JAAR EEEEREREREEEEEEEEREEE EERE REE 


TEST: 202 


-1 SHIFTED BY 16. = 0 PS = 11 


FREER ERE REE REEEER EEE REE REE 


TST202: MOV 
MOV 


INC 


PC,LPADR STORE ERROR LOOP ADDRESS 
ADUMMY , 23 ;LOAD R3 WITH DUMMY 
#-1,%3!1 LOAD R3!1 WITH =-1 


sSHIFT R3,R3!1 BY 16. 
SAVE P 
IS THE PS 11? 


+1 
PC, $HLT; SEEN AN "oat A TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 11 
270 SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


wy 1S THE RESULT 0? 


0 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
3R3 1s NOT EQUAL TO 0 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


(R5) ,4202 :IS STESTN = #202? 
+1 :IF NOT THEN GO TO HLT 
PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
sTEST IS IN WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


(R5) 


FREER KEE ERK KKK KKK KER KEKE EK 


3 TEST:203 


1 SHIFTED BY -1 = 100000 PS = 1 


DEREK 


TST203: MOV 
MOV 


PC,LPADR STORE ERROR LOOP ADDRESS 
5,R1 :SAVE R5 


R5,R 
ADUMMY , 25 [LOAD R5 WITH DUMMY 
#1,%5!1 LOAD R5!1 WITH 1 


sSHIFT RS,R5!1 BY =1 
TSAVE PS 
#' AP SWORD 71S THE PS 1? 
PC, $HLT;SEEN AN rg” “| TO THE /! ROUTINE 
sTHE PS IS NOT EQUAL TO 
:TO SCOPE, REP PPACE LAST: BEO .+10 (001403) 
*BY (013746 000172 000207) 
#100000, 45 zI1S THE RESULT 100000? 


PC,$HLT;SEEN AN ret GO TO THE HALT ROUTINE 
R5 15 NOT EQUAL TO 100000 


SEQ 0256 
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000077 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


010105 sRESTORE R5 


021527 000203 ins), 4203 :1S STESTN = #203? 
00140 :I1F NOT THEN GO TO HLT 
004767 011104 Bc, bats SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTEST IS IN WRONG SEQUENCE 
000100 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


005215 
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CJKDBB.P11 
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010767 


021527 
001403 
C4767 


090103 


005215 


010767 


130540 
000000 
125252 
177760 
042142 
000011 


011036 


125252 
011022 


000204 
011006 


130442 
125252 
125252 
000025 
042142 
000003 


010740 


052500 
010724 


MACY71 30A(1052) 


042142 


042142 
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ASHC INSTRUCTION TESTS 


lame tek °°” EeReee aumtiaes aoe ke ae ee 


TEST: 204 


125252 SHIFTED BY -16. = 125252 PS = 11 


PTTTTITOTITITITITICTTTTETTTTTTTTTTTTTTT TTT TTT TTT ERT TTT TTT TTT TTT TTT 


TST204: MOV 


INC 


PC,LPADR s STORE en LOOP ADDRESS 
ADUMMY , %1 [LOAD R1 WITH DUMMY 
#125252,%1!1 ‘LOAD R1!1 WITH 125252 
#-16.,%1 :SHIFT R1,R1!1 BY -16. 


@4PSWORD : SAVE PS 
#11, a4PSWORD 21S THE PS 11? 


+10 
PC, S$HLT;SEEN AN ERROR, GO TO THE HALT “et les 
3; THE PS IS NOT EQUAL TO 11 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


—* 4 21S THE RESULT 125252? 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
ZR 1s NOT EQUAL TO 125252 
:TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


(RS) 4204 :1S STESTN = #204? 
sIF NOT THEN GO TO HLT 
bc, $HLT; SEEN AN ERROR, GO TO THE HALT — 
sTEST IS IN WRONG SEQUENC 
:TO SCOPE REPLACE LAST: BEQ eit (001403) 
‘BY (013746 000172 000207) 


(R5) 


J RARER REE KEE EEE REKEKREREEREEEERRERKEEEEEEKEEEKEKEK 


:TEST:205 


125252 125252 SHIFTED BY 21. = 52500 000000 PS = 3 


FERRER RRR KEREREE EEE ERE 


TST205: MOV 


ADR. :STORE ERROR LOOP ADDRESS 
oT £56505 ZLOAD R2 WITH 125252 
4198985" $504 SLOAD R2!1 WITH 125252 
#21. ,%2 ;SHIFT R2,R2!1 BY 21. 
@4PSWORD SAVE PS 

#3, aAPSWORD [IS THE PS 3? 


+10 
PC,$HLT;SEEN AN ERRO?, GO TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 3 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#37300. %2 1S THE RESULT 52500? 
BC, SHUT: SEEN AN aT GO TO THE HALT ROUTINE 
NOT EQUAL TO 525 


e JS 
:10 scopé “REPLACE LAST: BEQ .+10 (001403) 


SEQ 0258 
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:BY (013746 000172 000207) 


047604 022703 000000 cme #000000, %2!1 s1S THE RESULT 000000? 
047612 010710 JSR bc. Cats SEEN AN ERROR, GO TO THE HALT ROUTINE 
R2!'1 IS NOT EQUAL TG 000000 
047616 :T0 scope REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


047620 (R5) ,#205 z1S S$TESTN = #205? 
047624 +10 :I1F NOT THEN GO TO HLT 
047626 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUENCE 
047632 :TO SCOPE, REPLACE LAST: BEO .*10 (001403) 
=BY (013746 000172 000207 


177771 
#S2,%4 
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FERRARA EERE AREER EE HE CREEK ERRERRERRRERE 


7 TEST: 206 125252 125252 SHIFTED BY S1 = 177525 52525 PS = 10 


FERRARA REE REREREREEEEKEEEE 


010767 TST206: MOV STORE ERROR LOOP ADDRESS 
127 MOV 4 $55 595 RO WITH 38252 
#198585" Lae LOAD ROH UIT 125252 


$1,%0 :SHIFT RO,RO!1 BY S1 
@APSWORD zSAVE PS 
042142 _— :1S THE PS 10? 


PC,$HLT; SEEN AN raat GO TO THE HALT ROUTINE 
THE PS IS NOT EQUAL TO 10 
sto SCoPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


177525 —— -%0 zI1S THE RESULT 177525? 


010576 PC,$HLT;SEEN AN ERROR GO TO THE HALT ROUTINE 
§ NOT EQUAL TO 177525 
:T0 scope” REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


022701 052525 #52525,%0!1 IS THE RESULT 52525? 
001403 .+10 


004767 010562 s PC, $HLT;SEEN AN Snort GO TO THE HALT ROUTINE 


IS NOT EQUAL TO 52525 GR INCORRECT SEQUENCE 
000112 ;TO SCOPE, REPLACE LAST: 3) -+10 (001403) 
‘BY (013746 0600172 000207) 


021527 (R5) 4206 1S THE STESTN = #206? 
001372 1$ ;1F NOT THEN GO TO HLT ABOVE 
005215 «oS 


SERRE EEK RRR EREEEEKEEEEKEEEEEKEREKEEEEEREREREEEEKREKEEREEKKKKKK 


TEST :207 125252 125252 SHIFTED BY @S2 = 177525 52525 PS = 10 


FERRER EERE EERE EERE EKERERKEKEKEEEKEEEEKEEEEEERERKK KKK 


010767 TST207: MOV PC, LPADR STORE ERROR LOOP ADDR 
012700 MOV #125252, %0 RO WITH §38050 
912701 #125252.%0!1 —-s LOAD ROH at ee 125252 


CLC 
075077 as2,%0 :SHIFT RO,RO!1 BY as2 
106737 @APSWORD AV S 
120737 042142 #10 ,@WPSWORD ‘Ts THE PS 10? 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT RS 
sTHE PS IS NOT EQUAL T 
000113 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


022700 #177525 ,%0 21S THE RESULT 177525? 
001403 +10 
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004767 010472 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sR § NOT ratte TO 177525 

000114 114 3:70 SCOPE REPLACE LAST: BEQ .+10 (001403) 

“BY (013746 600175" 000207) 


022701 052525 CMP #52525,%0!1 :I1S THE RESULT 52525? 
001403 BEQ -+10 


004767 010456 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;RO!1 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
000115 115 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600173" *900207) 


021527 000207 (R5) ,4207 1S THE STESTN = #207? 
72 1$ ;1F NOT THEN GO TO HLT ABOVE 


(R5) 
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SEAR RER ERE REEEEEEEREEREEEEERREREREEERRERREERERREERREEERREEEREE EE 


:TEST:210 125252 125252 SHIFTED BY @4S1 = 177525 52525 PS = 10 


FERRER ERERRERKEKE EERE REEREREKEREEREKKEE EE 


010767 TST210: MOV PC, LPADR STORE ERROR LOOP ADDRESS 
12700 MOV #125252, %0 D RO WITH 125252 
#125252.%0!1 Ss LOAD RO: itn 125252 


a4S1,%0 7 SHIFT ps RO!1 BY a4s1 
@A4PSWORD :SAVE P 
042142 MPB eo @4PSWORD 71S THE ps 10? 


050120 004767 PC.$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
HE PS IS NOT EQUAL TO 10 
050124 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


O21 a 40 31S THE RESULT 177525? 
050134 004767 010366 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
1§ NOT EQUAL TO 177525 
050140 ;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600172 000207) 


050142 022701 052525 #52525 ,%0!1 21S THE RESULT 52525? 
001403 -+10 


050150 004767 010352 PC.$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
'7 IS NOT EQUAL TO 52525 OR ee Sel SEQUENCE 
050154 000120 s¥o SCOPE REPLACE LAST: Beo -*+10 (001403) 
‘BY (013746 000172 000207) 


050156 021527 000210 CMP (R5) ,4210 1S THE STESTN = #210? 
ne Hi aR :1F NOT THEN GO TO HLT ABOVE 


FREER KEKE EKER KEE EKEKEEKERKEKEEEEKEREKKKEEEKEKEEREKKEKKK EEK 


3TEST:211 125252 125252 SHIFTED BY (3) = 177525 52525 PS = 10 


FERRER EKER EK EKEERK EEK KEKEEEKEKEEEEREKEEERKEEKEEEKEKKEK KEK 


0000 TST211: MOV STORE ERROR. LOOP ADDRESS 
5252 MOV W1D525>. RO WITH 125252 
5252 4158585" 5011 LOAD ROM OMIT 125252 


(3) ,%0 sSHIFT RO,RO!1 BY (3) 
042142 @4PSWORD ZSAVE PS 
000010 042142 — a@4PSWORD :IS THE PS 10? 
050222 004767 010300 PC, SHLT; SEEN AN eee p i gg Bt 7 Se 
050226 ;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 600175 000207) 


050230 022700 177525 #177525,%0 zI1S THE RESULT 177525? 
050234 001403 -+10 


13 
12 
12 
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CJKDBB.P11 
050236 
050242 


050244 


050252 
050256 
050260 


050264 
050266 


19=JUN=79 10:52 
004767 010264 
000122 
022701 052525 
001403 
004767 010250 
000123 
021527 000211 


001372 
005215 
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JSR 
122 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;RO 1S NOT EQUAL TO 177525 
0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
coy (013746 000172 000207) 


— 31S THE RESULT 52525? 
+ 


PC,SHLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO!1 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
:T0 SCOPE, REPLACE LAST: BEQ .+#10 /001403) 
:BY (013746 000172 000207) 


(R5) ,4211 31S THE STESTN = #211? 
a :IF NOT THEN GO TO HLT ABOVE 


SEQ 0263 





CJK 
12912 
1291 
12914 


—"OOWONOUSW 


050270 


050324 
050330 


050332 
050 


050354 
050360 


050362 
050366 
050370 


050372 


CJKDB-8 oe CPU_DIAG. 
DBB.P11 


19=JUN=79 10:52 


010767 
127 


022701 
001403 


004767 
000126 
021527 


001372 
005215 


010767 
012700 


022700 
001403 


010162 


052525 


010146 


127574 
125252 
125252 


042142 
000010 


010074 


MACY11 30A(1052) 
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042142 
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FARA RRR AREER REEEREEERER REE EREEERERERERREREEEREE EEE 


sTEST:212 


125252 125252 SHIFTED BY (3)+ = 177525 52525 PS = 10 


SERRA ARERR AREAEREREEERRREREREREREREEEEREEEEEREREREEREREERER EEE 


TST212: MOV 
MOV 


STORE ERROR LOOP ADDRE 
#13505 RO WITH 38252 
7198585" aOH1 LOAD R01 OMITH 125252 


(3)+,%0 ;SHIFT RO,RO!1 BY (3)+ 
@4PSWORD ;SAVE PS 
#10, a4PSWORD :1S THE PS 10? 


+1 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
TH PS Is NO! EQUAL TO 10 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 bOI 73. 000207) 


#177525 ,%0 21S THE RESULT 177525? 


+1 
PC, S$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
5RO IS NOT EQUAL TO 177525 
;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 000172 000207) 


— 71S THE RESULT 52525? 
= 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO!1 ' at EQUAL TO 52525 OR one SEQUENCE 
:TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


(R5) #212 31S THE $STESTN = #212? 
toa :1F NOT THEN GO TO HLT ABOVE 


FARRER RE REKEREEKKEKEEKEEREEKEKEREEEKEEEEEEREEKKEREREREKREREKKEKEEEKEEK 


7 TEST:213 


125252 125252 SHIFTED BY ~(3) = 177525 52525 PS = i0 


FRR RR E RR KEKREREREE EEK E REE KEEREEREEEKEEEEEKEEEEKEEEK 


TST213: MOV 
MOV 


:STORE ERROR LOOP ADDRESS 
913505 LOAD RO WITH 438252 
4158585" 5011 LOAD RO WITH 125252 


-(3),%0 :SHIFT RO,RO!1 BY -(3) 
@APSWORD ZSAVE PS 
oo aA4PSWORD :I1S THE PS 10? 
PC,$HLT;SEEN AN ~_, GO TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 10 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


w1rtes 0 1S THE RESULT 177525? 
. + . 


SE9 0264 
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050442 
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004767 010060 
000130 
022701 052525 
001403 
004767 010044 
000131 
021527 000213 


001372 
005215 
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JSR 
130 
CMP 
BEQ 
JSR 
131 
CMP 


BNE 
INC 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sRO IS T EQUAL TO 177525 
210 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


ee 21S THE RESULT 52525? 
.+ 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
RO!1 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
:T0 scope REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


(R5) ,4213 31S THE $STESTN = #213? 
imag ;1F NOT THEN GO TO HLT ABOVE 


SEQ 0265 
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FERRARA EEEEREEEKEREREEREEREREEERREEEEEEREREREEEEERERE EEE 


12986 
12987 STEST:214 125252 125252 SHIFTED BY 2(4) = 177252 125252 PS = 11 


12988 SRRRRER ERR RRR RARER EERE EERE RRR ERE EERE RARER RRR EEE EE 
12989 
12990 010767 TST214: MOV ADR. s STORE ERROR LOOP ADDR 
012700 MOV #1 D528 RO WITH 53850 
012701 #158585" a0! LOAD R014 uit 125252 


2(4) ,20 :SHIFT RO,RO!1 BY 2(4) 
@APSWORD SAVE PS 
042142 oa 1S THE PS 11? 


050530 
050532 004767 PC,S$HLT;SEEN AN oe GO TO THE a — 
THE PS IS NOT EQUAL TO 1 
050536 ;T0 SCOPE REPLACE LAST: BEC No (001403) 
‘BY (013746 000172 000207) 


gopeee 177252 oo 240 :I1S THE RESULT 177252? 
050546 004767 007754 PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
RO IS NOT EQUAL TO 177252 
050552 ;TO SCOPE, REPLACE _LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


050554 022701 125252 #125252,%0!1 31S THE RESULT 125252? 
001403 -+10 


050562 004767 007740 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
3RO!1 IS NOT EQUAL TO 125252 OR INCORRECT SEQUENCE 
050566 000134 :TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
BY (01 37he 000172 000207) 


050570 021527 (R5) 4214 1S THE $TESTN = #214? 
050574 001372 1$ IF NOT THEN GO TO HLT ABOVE 
050576 005215 (R5) 


peeduddedeeeendads 


W 
% 
WR OONAUSWN-—O 


FREER RRR KKK KEKE KEKE REE KEKE ER 


7 TEST:215 125252 125252 SHIFTED BY a(4) = 177525 52525 PS = 10 


FAKE KEE KEKE EKER EKER EKKEEKEREKEEEEEREEREEREEEKKEEKKEKKE EK 


010767 127366 TST215: MOV ADR. STORE ERROR LOOP ADDRESS 
00 125252 MOV #13526 D RO WITH 125252 
125252 4198985" a0! LOAD ROH rth 125252 


000000 a(4) ,%0 :SHIFT RO,RO!1 BY a(4) 
042142 @4PSWORD SAVE P 
000010 042142 CMPB — @4PSWORD :1S THE PS 10? 


007664 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;THE PS IS NOT EQUAL TO 10 
;T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


022700 177525 #177525 ,%0 21S THE RESULT 177525? 
001403 -+10 


aeee 


Bane 
SVSVSPy 


38s 
WN 
= 


1 
1 
1 
1 
4 
1 
1 
. 
1 
1 
1 
1 
1 
1 
1 
1 
7 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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KDBB.P11 


056702 
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004767 007650 
000136 
022701 052525 
001403 
004767 007634 
000137 
021527 000215 


001372 
005215 
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JSR 
136 
BE0 
JSR 
137 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;RO 1S NOT EQUAL TO 177525 
3:70 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


+" pac 71S THE RESULT 52525? 
.+ 


PC, $HLT;SEEN AN ERROR, G0 TO THE HALT ROUTINE 
RO'1 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
:T0 SCOPE, REPLACE LAST: BEQ --+10 (001403) 
:BY (013746 000172 000207) 


(R5) ,4215 1S THE STESTN = #215? 
ims) IF NOT THEN GO TO HLT ABOVE 


SEQ 0267 
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CJKDBB.P11 19=JUN=79 10:52 ASHC INSTRUCTION TESTS SEQ 0268 
13060 FREER ARERR REEEREERERERREERREKEEREREREREEREEREREEEEEREEEE EE 
13061 STEST:216 125252 125252 SHIFTED BY a(4)+ = 177525 52525 PS = 10 
13062 FRR RARER RRR REE EERE ERR 
13063 
13064 050704 010767 127262 TST216: MOV STORE ERROR. LOOP ADDRESS 
13065 050710 012700 125252 MOV Wi d525 RO WITH 125252 
13066 050714 012701 125252 MOV #198585" Lae ;LOAD RO: Outs 125252 
13067 050720 000241 CLC 
13068 050722 073034 ASHC a(4)+,2%0 zSHIFT RO,RO!7 BY a(4)+ 
13069 050724 106737 042142 MFPS § @A#PSWORD SAV 
13070 050730 122737 000010 042142 CMPB #10,a4PSWORD :IS THE PS 10? 

13071 050736 001403 BEQ +7 

13072 050740 004767 007562 JSR PC,$HLT:SEEN AN ERROR, GO TO THE HALT ROUTINE 

13073 s THE PS 1s NOT EQUAL TO 10 

13074 050744 000140 140 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13075 :BY (013746 000172 000207) 

13077 050746 022700 177525 CMP #177525, %0 yIS THE RESULT 177525? 

13078 050752 001403 BEQ +10 

13079 050754 004767 007546 JSR PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13080 :RO IS NOT EQUAL TO 177525 

13081 050760 000141 141 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13082 =BY (013746 000172 000207) 

13084 050762 022701 052525 CMP 52525,%0!1 zIS THE RESULT 52525? 

13085 050766 001403 BEQ .+10 

13086 050770 1$: 

13087 050770 004767 007532 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTI 

13088 RO!'1 IS NOT EQUAL TO 80855 OR OR INCORRECT SEQUENCE 
13089 050774 000142 142 :T0 SCOPE, REPLACE LAST: BEQ --+10 (001403) 
13090 ‘BY (013746 000172 000207) 

13092 050776 021527 000216 CMP (R5) 4216 s1S THE $TESTN = #216? 

13093 051002 001372 BNE 1$ :1F NOT THEN GO TO HLT ABOVE 

13094 051004 005215 INC (RS) 

13095 

13096 

13097 FREER KKK EEE EEE ERE EKER KEE EERE EKER 
13098 STEST:217 125252 125252 SHIFTED BY a-(4) = 177525 52525 PS = 10 
13099 FREER KER REE EEEEKEKEEEKEKRE 
13100 

13101 051006 010767 127160 TST217: MOV OR STORE ERROR LOOP ADDRESS 

13102 051012 012700 125252 MOV #13505 RO WITH 125252 

13103 051016 012701 125252 MOV 4198585" Hae LOAD RO am 125252 

13104 051022 000241 CLC 

13105 051024 073054 ASHC a=(4),%0 :SHIFT RO,RO!1 BY a-(4) 
13106 051026 106737 042142 MFPS § a#PSWORD ZSAVE P 

13107 051032 122737 000010 042142 CMPB #10,a4PSWORD :IS THE PS 10? 

13108 051040 001403 BEQ +10 

13109 051042 004767 007460 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13110 ;THE PS IS NOT EQUAL TO 10 

13111 051046 000143 143 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13112 :BY (013746 000172 000207) 

13114 051050 022700 177525 CMP #177525, %0 :1S THE RESULT 177525? 

13115 051054 001403 BEQ +10 
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CJKDBB.P11—- 19=JUN=79 10:52 ASHC INSTRUCTION TESTS SEQ 0269 
13116 051056 004767 007444 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
13117 RO 18 NOT EQUAL TO 177525 
13118 051062 000144 144 3:70 SCOPE REPLACE LAST: BEQ .+10 (001403) 
13119 =BY (013746 000172 000207) 
13121 051064 022701 052525 CMP #52525,%0!1 z1S THE RESULT 52525? 
13122 051070 001403 BEQ +10 
13123 051072 1$: 
13124 051072 004767 007430 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
13125 RO!1 IS NOT ta TO 52525 OR INCORRECT SEQUENCE 
13126 051076 000145 145 :10 SCOPE, REPLACE LAST: BEQ +10 (001403) 
13127 “BY (013746 000172 002095 
13129 051100 021527 000217 CMP (R5) #217 :1S THE $TESTN = #217? 
13130 051104 001372 BNE 1$ 7 IF NOT THEN GO TO HLT ABOVE 
13131 051106 005215 INC (R5) 
13132 
13133 
13134 
13135 
13136 
13137 
13138 
13139 
13140 
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FARRER REE RERKEKEEEREKREK 


MUL INSTRUCTION TESTS 


TEES III II IO IOI 


x 
RII IIIT TOTO OUI IIT TOI TOIT AA IANS ASASASSIASIS SSI SISASI SAI SSS. 


TEST: 220 MUL 1* #0=00 PS = 4 


FREER ERE KEE KKK EKER EERE 


010767 127056 TST220: MOV PC,LPADR STORE ERROR LOOP ADDRESS 
0127 MOV #1,%0 sLOAD MULTIPLICAND WITH 1 
coe pe 1 * #0 


042142 “eo 71S PS = 4 
007362 PC, $HLT; SEEN AN oo Tg ne THE HALT ROUTINE 


-PS | 
051144 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


051146 000000 #020 :1S HIGH ORDER = 0 
051154 007346 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
051160 :T0 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


051162 022701 000000 #0,%0!1 :1S LOW ORDER = 0 
pase 001403 .+10 


051170 004767 007332 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
LOw OR DER IS WRONG OR WRONG SEQUENCE 
051174 000150 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 600175 000207) 


051176 021527 000220 (R5) ,4220 
051202 001372 BN 1$ 71F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
051204 005215 (R5) 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
. 
: 
; 
1 
1 
4 
| 
; 
1 
1 
1 
1 
; 
5 
} 
: 
; 
1 
1 
1 
1 
1 
1 
1 


WIN WNINWN NAW NW WWW WWNIWINIW WNW WWWWNWAIWIWWIWNIWNWWWANWNWNWAWWW 
a dk kd dd ad ad I 2 ot 2 I ot od 


“gat Secon te ages eg 
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FREER ERE EEA REE REE ARERR EEE REE 


STEST:221 MUL “1 * #1 = -1 -1 PS = 10 


FARRAR REAR EAEREEEEREREREREERREEEERERREEEAREREEREREEEEE REE 


010767 126760 TST221: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
MOV #~-1,%0 : LOAD MULTIPLICAND WITH =1 
#1,%0 :MUL TIPLY <1 * #1 
2 a@4PSWORD AVE PS 
000010 042142 #10 ,@WPSWORD TS PS = 10 


007264 PC,$HLT; SEEN AN Ae A THE HALT ROUTINE 


S 
051242 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


051244 177777 #1 0 z1S HIGH ORDER = -1 
051252 007250 PC,$HLT:SEEN AN ERROR, GO TO THE HALT ROUTINE 
sHIGH ORDER IS WRONG 
051256 000152 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


051260 622701 177777 #-1,%0!1 IS LOW ORDER = -1 
001403 -+10 


051266 004767 007234 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sL DER 1s WRONG OR WRONG SEQUENCE 
051272 000153 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600172 000207) 


051274 021527 000221 (R5) ,4221 
051300 001372 1$ :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
051302 005215 (R5) 


= 
Ww 
pe 
oo 
Ww 


WWWNWWNNWWAWWWNWNWNWNNWAS 
CS a at ek ks 2 2 ot ot I a 


Ses etched rite 


WWNWW 


WWWANWAG 
POMOROPOPONPO NAN 
ete eed ed od od 
NOUS IANO 


1 
1 
1 
1 
1 
1 
1 
, 
: 
1 
1 
1 
1 
1 
1 
j 
1 
: 
1 
1 
1 
7 
1 
; 
1 
1 
1 
1 
1 
, 
; 
; 
: 


WG 
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FREER RK REE EERKEREEREREKREEKREEEEEEEEEEKEEEEEREEEEREEREE SE 


TEST :222 MUL 2*#2=04 PS = 0 


FERRARA EERE EERE EERER ERE 


010767 126662 TST222: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
000002 MOV #2,%2 LOAD MUL TIPL I CAND WITH 2 
000002 MU #2 ,%2 SMULTIPLY 2 * #2 
042142 SAVE PS 
000000 042142 IS PS = 0 


+10 
007166 PC,$HLT;SEEN AN OOS 1g pe THE HALT ROUTINE 


PS I 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


922702 #0,22 z1S HIGH ORDER = 0 
004767 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
051354 000155 :TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


051356 022703 000004 M4 %2!1 71S LOW ORDER = 4 
EAE a4 001403 -+10 
051364 004767 007136 ’ PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 

-< ORD ry IS WRONG OR WRONG SEQUENCE 
051370 000156 ;TO SCOPE E LAST: BEQ .+10 (001403) 


:BY (OT sPGee Po00I 75 000207) 
051372 021527 000222 (R5) 4222 
001372 1$ 


:1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
005215 (R5) 
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051402 


051440 


051442 
051446 
051450 


051454 


051456 


051470 


051472 
051476 
051500 
051502 


010767 


022705 
001403 


004767 
000161 


021127 
001372 
010105 
005215 


19=JUN-79 10:52 


126564 
001000 
000200 
042142 
000001 


007066 


000000 


007036 


000223 
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MUL INSTRUCTION TESTS 


PAAR KEEEREREREEREKEREK EEE EREREREEE EKER E 


STEST:223 


1000 * #200 = 1 0 PS = 1 


FARRAR AREER ERRREREEREREEREREREEREEERARERRAEEER EERE EERE 


TST223: MOV 
MOV 


PC,LPADR STORE ERROR LOOP ADDRESS 
R5,R1 7SAVE R5 


#1000, %4 [LOAD MULTIPLICAND WITH 1000 
#200, %4 ‘MULTIPLY 1000 * #200 
@4PSWORD SSAVE PS 

#1 ,@APSWORD TIS PS = 1 


0 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;PS 1§ WRONG 


Ss I 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


#1,%4 1S HIGH ORDER = 1 


.+10 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
:T0 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#0,%4!1 71S LOW ORDER = 0 
-+10 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 

:BY (013746 000172 000207) 


(R1) 4223 CHECK THE TEST NUMBER 
1$ IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
oe :RESTORE R5 


SEQ 0273 
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FEAR REE REE EREERER ERE 


TEST :224 MUL 2 * #77777 = 0 177776 PS = 


SERA EEEREEKEREKEEREREREEEKEEKEREKEREEEEEEEREE KEKE 


010767 126462 TST224: MOV PC,LPADR + STORE ERROR LOOP ADDRESS 
000002 MOV a iy MULTIPLICAND WITH 2 
077777 MU #77777 ,%0 SMULTIPLY 2 * #77777 
042142 @4PSWORD SAVE PS 
000001 042142 MPB #1 , AAPSWORD 71S PS = 1 


.+10 
006766 PC,$HLT;SEEN AN ERROR, WRONG, THE HALT ROUTINE 


=PS G 
051540 :TO SCOPE, REPLACE L BEQ .+10 (001403) 
‘BY (013746 600173" *$0020%) 


EE rs wey 31S HIGH ORDER = 0 
051550 PC,$HLT;SEEN AN tty ay GO _ TO THE HALT ROUTINE 
woe IS WR 


ONG 
051554 ;TO scope REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


051556 022701 177776 #177776,%0!1 1S LOW ORDER = 177776 
001403 -+10 


004767 006736 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
gl 34 IS WRONG OR WRONG SEQUENCE 
951570 000164 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000173 000207) 


051572 021527 000224 (R5) ,A#224 
051576 1$ :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
051600 (R5) 


SS 


oe333 


SSleaRascss 


a cD cae ceed ae ad ad ad cd od 
WODONAUSWN—O 


SNSS 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
1 
1 
1 
1 
: 
j 
1 
1 
1 
1 
1 
1 
1 
1 
1 


WWNWWANWWWWWWWNWWWNWWWNWANWANWWWWA 


WMA AAA 


* 
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1622 
051630 
051632 


051652 


051654 
051660 


051670 
051674 
051676 


19=JUN-79 10:52 


010767 


022702 


022703 
001403 


004767 
000167 


021527 
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SEERA EEEEKEEEKEEREKEEEKEREREREKEE 


TEST :225 


MUL 7777 * #10 = 0 77770 PS = 0 


SEAR EEEEREKREEREREREREREKEEAEEREEEEEEKERERERERERERE EE 


TST225: MOV 
MOV 


042142 


PC,LPADR ;STORE ERROR LOOP ADDRESS 
#7777 ,%2 ZLOAD MULTIPLICAND WITH 7777 
#10,%2 SMULTIPLY 7777 * #10 
aePSWORD sSAVE PS 

#0, @APSWORD TIS PS = 0 


+10 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
: S WRONG 


:PS | 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#0,%2 1S HIGH ORDER = 0 


.+10 
PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sHIGH ORDER IS WRONG 
;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


tA aaa 21S LOW ORDER = 77770 


+ 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE - 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


(R5) ,A225 
1$ 


(RS) :I1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0275 
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Tr 
ES | 


FEAR EEEREEREEREEREEREREEEREEEEEEEEEERREREEREREERREREREREERKEEREE EE 


; TEST :226 MUL 77777 * #77777 = 37777 1 PS = 


FEAR REE EEREREEREREEEERERREEEREERREEEREEEEKEREREEEKEEEEE 


010767 126266 1$T226: MOV PC,LPADR STORE ERROR LOOP ADDRESS 
MOV RS_R1 SAVE R 
077777 #77777 .%4 [LOAD MULTIPLICAND WITH 77777 
077777 MU #77777 XG SMULTIPLY 77777 * #77777 
042142 @APSWORD PS 
000001 042142 MPB #1 , @#PSWORD tIS PS = 1 


.+10 
051732 004767 006570 PC,$HLT;SEEN AN Oe is A THE HALT ROUTINE 


PS IS WR 
051736 sT@ SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


051740 037777 #37777. %4 z1S HIGH ORDER = 37777 
051746 006554 pc, ats SEEN AN ERROR, GO TO a HALT ROUTINE 
;HIGH ORDER IS WRONG 
051752 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


WWWWNWNIANNWNW 
SESSLER 


051754 022705 000001 #1,%4!1 71S LOW ORDER = 1 
barcee 001403 -+10 
051762 004767 006540 PC,$HLT;SEEN AN et Ou OROER T THE HALT ROUTINE 


L DER IS WRONG OR WRONG SEQUENCE 
051766 000172 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


051770 021127 (R1) A226 * sCHECK THE TEST NUMBER 

051774 001372 1$ zIF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
051776 R1,R5 “RESTORE RS 

052000 (R5) 
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CJKDBB.P11 19=JUN=79 10:52 MUL INSTRUCTION TESTS SEQ 0277 
13397 FARE AREEERERERKEERERE EERE EERE KERR EEE 
13398 = TEST:227 MUL <1 * #77777 = =1 100001 PS = 10 
13399 FREER EERE ERE ERA RREREREKEEREAEE EERE ERAEEREEREEREEEKEER REE 
13400 
13401 052002 010767 126164 1ST227: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
13402 052006 012702 177777 MOV #=-1,%2 [LOAD MULTIPLICAND WITH =1 
13403 052012 070227 077777 MUL #77777 ,%2 SMULTIPLY <1 * #77777 
13404 052016 106737 042142 MFPS  a#PSWORD TSAVE PS 
13405 052022 122737 000010 042142 CMPB =«s-s«s#'10, @M#PSWORD = : IS PS = 10 
13406 052030 001403 BEQ +10 
13407 052032 006470 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
13408 :PS 1§ WRONG 
13409 052036 000173 173 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13410 :BY (013746 000172 000207) 

13412 052040 022702 177777 CMP #-1,%2 71S HIGH ORDER = =1 

13413 052044 001403 BEQ +10 

13414 052046 004767 006454 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13415 sHIGH ORDER IS WRONG 

13416 052052 000174 174 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
aeele sBY (013746 0900172 000207) 

13419 052054 022703 100001 CMP #100001,%2!1 z1S LOW ORDER = 100001 

13420 052060 001403 BEQ +10 

13421 052062 1$: 

13422 052062 004767 006440 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13423 sLOW ORDER IS WRONG OR WRONG SEQUENCE 
13424 052066 000175 175 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13435 :BY (013746 000172 000207) 

13427 052070 021527 000227 CMP (R5) ,#227 

13428 052074 001372 BNE 1$ :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
13429 052076 005215 INC (RS) 

13430 

13431 
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CJKDBB.P11 19=JUN=79 10:52 L INSTRUCTION TESTS SEQ 0278 
13432 FRA EREEEREREREEEE EER RERERERREEEERERRERERRRERE RES 
13433 = TEST :230 MUL <2 * #77777 = -1 2 PS = 11 
13434 FAA REEEEEKEEREEREEEREREEEERERERREREEEREREEREKEE HEE 
13435 
13436 052100 010767 126066 TST230: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
13437 052106 012700 177776 MOV #-2,%0 ZLOAD MULTIPLICAND WITH <2 
13438 052110 070027 077777 MUL #77777, 20 “MULTIPLY <2 * #77777 
13439 052114 106737 042142 MFPS § a#PSWORD “SAVE PS 
13440 052120 122737 000011 042142 CMPB so #11,a@4PSWORD :IS PS = 11 
13441 052126 001403 BEQ .+10 
13442 052130 004767 006372 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
13443 =PS 1§$ WRONG 
13444 052134 000176 176 zTO SCOPE, REPLACE LAST: BEQ .+#10 (001403) 
it res =BY (013746 000172 000207) 

13447 052136 022700 177777 CMP #-1,%0 31S HIGH ORDER = =1 

13448 052142 001403 BEQ +10 

13449 052144 004767 006356 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13450 sHIGH ORDER IS WRONG 

13451 052150 000177 177 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13432 :BY (013746 000172 000207) 

13454 052152 022701 000002 CMP #2,%0!1 z1S LOW ORDER = 2 

13455 052156 001403 BEQ .+10 

13456 052160 1$: 

13457 052160 004767 006342 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13458 sLOW ORDER IS WRONG OR WRONG SEQUENCE 
13459 052164 000200 200 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13460 :BY (013746 000172 000207) 

13462 052166 021527 000230 CMP (R5) ,#23C 

13463 052172 001372 BNE 1$ yIF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
13464 052174 005215 INC (R5) 

13465 

13466 
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FARRAR ARR REEAR ERR RERERERREREREREEEERER EERE EEE 


TEST:231 MUL 125252 * #2 = =1 52524 PS = 11 


FEE ERE EERE REE REE ERERERREEREAE EEE ERE ERE 


PC,LPADR ;STORE ERROR LOOP ADDRESS 
#125252, %2 ‘LOAD MULTIPLICAND WITH 125252 
#2,%2 ‘MULTIPLY 125252 * #2 
a@APSWORD TSAVE PS 

042142 wl, ,@APSWORD =: JS PS = 11 


0 
052226 PC,$HLT;SEEN AN “pa if GO A... THE HALT ROUTINE 


S IS WR 
052232 :T0 scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


177777 a" 31S HIGH ORDER = -1 


052242 006260 PC,$HLT; SEEN AN ERROR. GO TO THE HALT ROUTINE 
ORDER IS WRONG 
052246 :TO scopé. REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


052250 022703 052524 #52524,%2!1 21S LOW ORDER = 52524 
001403 .+10 


052256 004767 006244 PC, $HLT; SEEN AN rey GO TO THE HALT ROUTINE 
ORDER IS WRONG OR WRONG SEQUENCE 
052262 000203 :TO scopé. REPLACE LAST: BEQ .+10 (001403) 
SBY (013746 000172 000207) 


052264 021527 000231 (R5) ,4231 
052270 001372 1$ :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
052272 005215 (R5) 


010767 TST231: MOV 
MOV 
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FERRER REE AREER EKER EE 


;TEST:232 MUL 125252 * #40000 = 165252 100000 PS = 11 


TEASERS IISIOITIISISISIOISISIEIIEI IOI IOI IIIS III III III I III I tek 
052274 010767 125672 TST232: MOV PC,LPADR 4 th © pes LOOP ADDRESS 
052300 MOV 


R5,R 
125252 #125252, % ‘TOAD PUL TIPLICAND WITH 125252 
040000 #40000, £4 “MULTIPLY 125252 * #40000 
042142 VE PS 


@APSWORD :SA 
00011 042142 a @4PSWORD :IS PS = 11 
052326 006174 PC, $HLT; SEEN AN ee ig Crone THE HALT ROUTINE 


PS 
052332 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


022704 165252 ht * iale 24 1S HIGH ORDER = 165252 


001403 
004767 006160 rey SHLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
000205 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


WWWWWNWNWWWNWAWWG 
PIAA ASTI 
NONRINID SS Se 
WN $C ODONAUSWWN—O 


WW 


022705 100000 #100000 ,%4!1 1S LOW ORDER = 100000 
001403 .+10 


004767 006144 PC, $HLT;SEEN AN ;LOwGRDE TO THE HALT ROUTINE 


L D R IS WRONG OR WRONG SEQUENCE 
000206 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
[BY (013746 600175 000207) 


021127 000232 (R1) ,4232 ;CHECK THE TEST NUMBER 
001372 1$ IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
010105 R1,R5 SRESTORE R5 

052374 005215 (R5) 
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052376 


052426 
052432 


052442 
052446 


052450 


052456 
052462 


052472 


010767 
0127 


022701 
001403 


004767 
000211 


021527 


125579 


031222 
006060 


026100 


006044 


MACY11 30A(1052) 


(42142 
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MUL INSTRUCTION TESTS 


FERRER ERE REESE 


TEST: 233 


MUL 107070 * #107070 = 31222 26100 PS = 1 


SAAR ERE EERE EEK EEE 


TST233: MOV 
MOV 


PC, LPADR ZSTORE ERROR LOOP ADDRE 
#107070, %0 ‘LOAD MULTIPLICAND opty 407070 
#107070.%0 ;MULTIPLY 107070 * #107070 
a4PSWORD 


VE PS 
haat a PS = 1 
PC,$HLT;SEEN AN oos 18 ne THE HALT ROUTINE 


S 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


#31222, 20 z1S HIGH ORDER = 31222 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER Is WRONG 
:10 SCOPE. REPLACE BEQ .+10 (001403) 
“BY (013746 600173" *$00207) 
#26100,20!1 71S LOW ORDER = 26100 
a 
PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 000172 000207) 
(R5) ,4233 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HiT ABOVE 


SEQ 0281 
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CJKDBB.P11 


052474 


052524 
052530 
052532 
052536 
052540 


052544 


052546 


052554 
052560 


052562 
052566 
052576 


010767 


022701 
001403 
004767 


000213 
022701 
001403 


004767 
000214 


021527 


125472 
hhbad 


00000 
042142 
000010 


005776 


177777 
005762 


177777 


005746 


MACY11 30A(1052) 


042142 
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MUL INSTRUCTION TESTS 


ain Oe. aensaea- «maa 


TEST: 234 


-1* #1 = =1 <1 = 10 


s aaeonlnaiaidiianinnttadaneeniuneananamanadnseseneataaaaennatiniiiens 


TST234: MOV 
MOV 


PC,LPADR STORE ERROR LOOP ADDRESS 

#~1,%1 ;LOAD ato s or WITH =1 

ae *1 ;MULTIPLY <1 * #1 
a4PSWORD 2 SAVE PS 

oe 71S PS = 10 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
1§ WRONG 


=PS 
:TO SCOPE, REPLACE LAST: @£€Q .+10 (001403) 
‘BY (013746 000172 000207) 


#-1,%1 1S HIGH ORDER = -1 


+10 
PC,S$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
:T0 S Score, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#-1,%41!1 :1S LOW GRDER = -1 
-+10 
PC, $HI.T;SEEN AN ERROR, GO TO THE HALT ROUTINE 
i?" OR ri yp A OR WRONG SEQUENCE 
;TO SCOPE, BEQ .+10 (001403) 
:BY (01 3746" "900175 *b60207) 
(R5) ,4234 
1$ 


(RS) :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0282 
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CJKDBB.P11 19=JUN=79 10:52 MUL INSTRUCTION TESTS SEQ 0283 
13609 FRR RII TREAT ERERREERRRERRE REE 
13610 3s TEST:235 MUL -1 * #0 =00 PS =4 
13611 SII TI TI IRE RI RRR ERE RE RERER ERE ERR EEE 
13612 
13613 052572 010767 125374 TST235: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
13614 052576 012703 177777 MOV #-1 ,%3 ;LOAD MULTIPLICAND WITH -1 
13615 052602 070327 000000 MUL #0, 43 [MULTIPLY =1 * #0 
13616 052606 106737 042142 MFPS a@4PSWORD SAVE PS 
13617 052612 122737 000004 042142 CMPB #4 , AAPSWORD 318 PS = 4 
13618 052620 001403 SEQ .+10 
13619 052622 004767 005700 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
13620 3PS IS WRONG 
13621 052626 000215 215 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
1362¢ :BY (013746 000172 000207) 

13624 052630 022703 000000 CMP #0,%3 71S HIGH ORDER = 0 

13625 052634 001403 BEQ +10 

13626 052636 004767 005664 JSR PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13627 sHIGH ORDER IS WRONG 

13628 052642 000216 216 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13628 :BY (013746 000172 000207) 

13631 052644 022703 000000 CMP #0,%3!1 71S LOW ORDER = 0 

13632 052650 001403 BEQ +10 

13633 052652 1$: 

13634 052652 004767 005650 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13635 2 ORDER IS WRONG OR WRONG SEQUENCE 
13636 052656 000217 - 217 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
HF +g 24 :BY (013746 000172 000207) 

13639 052660 021527 000235 CMP (R5) ,4235 

13640 052664 001372 BNE 1$ 7 1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
13641 052666 005215 INC (R5) 

13642 

13643 


CJKDB-B DCF11=AA CPU_DIAG. 
CJKDBB.P11 


13644 
13645 
13646 


a3 


SOE nce 
WOONAUIESW—O O00 


SESERERES 


ae 
oo 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
3 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Bilan RNIN 
BS aeeaees 


— 


052670 


052722 
052726 


052742 


052744 


052752 
052756 


052760 
052764 
052766 
052770 


010767 


022705 
001403 
004767 


000221 
022705 
001403 


004767 
000222 


021127 


19=JUN=79 10:52 


125276 
077777 
100000 
042142 
000011 
005600 


100000 
005564 


100000 


005550 


MACY11 30A(1052) 


042142 
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MUL INSTRUCTION TESTS 


FREER ERA RERAEREERERRREEEEKEEEEEEEEREREREREEEEREEREEEEREREEREEE 


7 TEST: 236 


MUL 77777 * #100000 = 100000 100000 PS = 11 


SERRE RR RR RRR RERERRR REE E EERE RRR ERR REE RRR ERE ERR RRR 


TST236: MOV 
MOV 


ee CAVE R wns LOOP ADDRESS 


5-R1 :S 
#77777 ,%5 *LOAD MULTIPLICAND WITH 77777 
#100000, %5 MULTIPLY 77777 * #100000 
@APSWORD AVE PS 
#11, a4PSWORD 78 PS = 11 


+1 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
3PS IS WRONG 


:TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


—— 245 1S HIGH ORDER = 100000 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 

10 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


ee :1S LOW ORDER = 100000 
+ 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT -- 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 
;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 600172 000207) 


(R1) ,4236 ;CHECK THE TEST NUMBER 
1$ IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
ae SRESTORE R5 


SEQ 0284 
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ee 


seossecner 


oO 


eS dd ed 8 wd ed 


052772 


19=JUN=79 10:52 


010767 


022701 
001403 


004767 
000225 


021527 


125174 


100001 


005450 


000237 
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MUL INSTRUCTION TESTS 


tTEST:237 MUL. 1 * #77777 = 100001 100001 PS 2 10 


> TEST :237 


MUL -1 * #77777 = 100001 100001 = 10 


s aaaanaatinnhiimennenadieninnanmnntatiad danieenaneinneniantnaneads 


TST237: MOV 
MOV 


PC,LPADR zSTORE ERROR LOOP ADDRESS 
- LOAD MULTIPLICAND WITH =1 
#77777, %1 LTIPLY <1 * #77777 
@4PSWORD < SAVE PS 

#10,a4PSWORD :IS PS = 10 


+1 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
PS I$ WRONG 


:TO SCOPE, REPLACE LAST: -+10 (001403) 
“BY (013746 000172 do0209) 


#100001, “1 1S HIGH ORDER = 100001 
BC, S$HLT; SEEN AN ERROR. GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 


:T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#100001 211 z1S LOW ORDER = 100001 
+ 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sLOW ORDER IS WRONG OR WRONG SEQUENCE 
;TO SCOPE REPLACE LAST: BEQ .+1C (001403) 
‘BY (01 3740 000172 000207) 
(RS) 4237 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0285 
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053070 


053120 
053124 


053126 


053140 


053142 


053150 
053154 


053156 


010767 


022703 
001403 
004767 
000227 
022703 
001403 
004767 


000230 


021527 


125076 
077777 
077777 
042142 
000001 


005402 


000001 
005366 


000001 


005352 


000240 
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MUL INSTRUCTION TESTS 


FARRAR ARERR RR EREREREEKREREEEER REAR EERERREREREEEEREREE EE 


TEST: 240 


MUL 77777 * #77777 = 1:*'1 PS = 1 


FERRARA REE RARER EEE RRR REE EREREREEREEEERE ERE 


TST240: MOV 
MOV 


PC,LPADR ;STORE ERROR LOOP ADDRESS 
#77777,%3 ZLOAD MULTIPLICAND WITH 77777 
13 SMULTIPLY 77777 ® #77777 
SSAVE PS 
#'| ,APSWORD :1S PS = 1 


PC,$HLT;SEEN AN ERROR, A THE HALT ROUTINE 


:PS 1S WR 
;T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 000172 000207) 


31S HIGH ORDER = 1 


:SEEN AN ERROR, GO TO THE HALT ROUTINE 

HIGH ORDER IS WRONG 
:T0 SCoPE REPLACE LAST: 3} -*+10 (001403) 
“BY (013746 000172 000207 


#1,%3!1 :1S LOW ORDER = 1 
.+10 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;LOW ORDER IS WRONG OR WRUNG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 
(R5) ,#240 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0286 
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FERRARA EEERREERREEEREEEEREERRREEREERERERRREREEERER EERE 


3 TEST:241 MUL 2* #2=44 PS = 


DIARIO OOD SIDIOIDIOIOISIOISIOISOIUIOIOIIOIIOIIOISI OI IOITIIDIIDIIIOI IID OIC IOI IOI INI 
010767 TST241: MOV PC,LPADR STORE ERROR LOOP ADDRESS 
MOV R5,R1 SAVE R5 
: LOAD ey te WITH 2 


.+10 
053220 004767 PC, SHLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sPS IS WRONG 


S 
053224 ;T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


053226 022705 000004 #4 %5 z1S HIGH ORDER = 4 
053232 001403 +10 
053234 004767 005266 PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sHIGH ORDER IS WRONG 
053240 000232 ;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


053242 022705 000004 #4 ,%5!1 sI1S LOW ORDER = 4 
001403 .+10 


053250 004767 005252 ; PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
LOW ORDER IS WRONG 


OR OR WRONG SEQUENCE 
053254 000233 :T0 SCOPE, REPLACE LAST: BEQ -+10 (001403) 
=BY (013746 000172 000207) 


053256 021127 (R1) #241 :CHECK THE TEST NUMBER 
001372 1$ IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
010105 R1,R5 TRESTORE RS 
005215 (R5) 





CJKDB=8 DCF11=AA CPU eye 
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CJKDBB.P11 19=JUN=79 
13788 053270 012702 
13789 053274 012703 042174 
13790 053300 012704 042176 
13791 
13792 
13793 
13794 
13795 
13796 053 010767 124662 
13797 053310 012700 125252 
13798 053314 0067 166654 
13799 053320 737 =042142 
13800 053324 122737 000011 
13801 053332 001403 
is 053334 004767 005166 
13804 053340 000234 
13805 
13806 
13807 053342 022700 165252 
13808 053346 001403 
344 053350 004767 005152 
13811 053354 000235 
13812 
13813 
13814 053356 022701 100000 
13815 053362 001403 
13816 053364 
ie 053364 004767 005136 
13819 053370 000236 
13820 
13821 
13822 053372 021527 000242 
13823 053376 001372 
13824 053400 005215 
13825 
13826 


MACY11 30A(1052) 


042142 
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MOV 
MOV 
MOV 


TEST: 242 


#40000, %2 
#S5,%3 
#S6,%4 
FERRER EHEKKKKKE 125252 * $5 = 165252 100000 PS =. 11 
MUL 125252 * $5 = 165252 100000 11 
ab oe Ee FO Sy So FT sn At 4 on RS, ol 1D 
PC, LPADR ;STORE ERROR LOOP ADDRESS 
#125252, 40 LOAD MULTIPL I CAND WITH 125252 


TST242: MOV 
MOV 


1$: 


MUL 
MFPS 
MPB 


:MULTIPLY 125252 * 
BeWORD 3S PS 
a1 @4PSWORD 71S PS = 11 
Bc, $HLT; SEEN AN ERROR, GO TO THE HALT ROUTINE 
2P WRONG 


:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 600175 000207) 


oo yee 40 21S HIGH ORDER = 165252 
PC, $HLT; SEEN AN ERROR, GO _TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 


s70 scoPé REPLACE LAST: BEQ .+10 (001403) 
[BY (013746 000172 000207) 


#100000, %0!1 :1S LOW ORDER = 100000 
a 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT yr ot 
ORDER IS WRONG OR WRONG SEQUENCE 
:T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 
(R5) #242 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0288 


ah. 
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13827 FARA EERE ERREREKERRERKEKREKERRERERERREEREEEREEREREERRREREEREREE 
13828 [TEST :243 MUL 125252 * aS6 = 165252 100000 PS = 11 
13829 FREAK EREEEEREEEREREEEEEEEREERREEEREEREREERERREE 
13830 

13831 053402 010767 124564 TST243: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 

13832 053406 012700 125252 MOV #125252,%0 ZLOAD MULTIPLICAND WITH 125252 

13833 053412 070077 16656 L S6,%0 sMULTIPLY 125252 * aS6 

13834 053416 106737 042142 MEPS — @APSWORD SSAVE PS 

13835 053422 122737 000011 042142 CMPB =s«#11,a@4PSWORD :IS PS = 11 

13836 053430 001403 BEQ +10 

13837 053432 004767 005070 JSR PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13838 sPS 1§ WRONG 

13839 053436 000237 237 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13340 :BY (013746 000172 000207) 

13842 053440 022700 165252 CMP #165252, %0 z1S HIGH ORDER = 165252 

13843 053444 001403 BEQ +7 

13844 053446 004767 005054 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13845 sHIGH ORDER IS WRONG 

13846 053452 000240 240 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13867 7BY (013746 000172 000207) 

13849 053454 022701 100000 CMP #100000,%0!1 z1S LOW ORDER = 100000 

13850 053460 001403 BEQ .+10 

13851 053462 1$: 

13852 053462 004767 005040 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

13853 zi DER IS WRONG OR WRONG SEQUENCE 
13854 053466 000241 241 3;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
13898 :BY (013746 000172 000207) 

13857 053470 021527 000243 CMP (R5) 243 

13858 053474 001372 BNE 1$ y1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
13859 053476 005215 INC (R5) 

13860 

13861 


BS 
CJKDB=B DCF11=AA CPU_DIAG. MACY11 ae tak 19=JUN=79 11:08 PAGE 290 
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FERRARA ARERR REEEEEEEEEEKEREREEREEREREREKEREEKEEEREEEEEEKEREEE 


ZTEST:244 MUL 125252 * a#S5 = 165252 100000 PS = 11 


FERRARA EERE REKEEEEREE EERE EREREKEEEERERERR EE 


010767 124466 TST244: MOV PC,LPADR :STORE ERROR LOOP ADDRESS 

0 MOV #125252,%0 SLOAD MULTIPLICAND WITH 125252 
$5, %0 SMULTIPLY 125252 * a#S5 

a4PSWORD 7 SAV 

#11 ,@APSWORD TIS PS = 11 

PC, $HLT:SEEN AN ERROR g 60,70 THE HALT ROUTINE 


S IS WR 
:T0 scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


165252 — .%0 1S HIGH ORDER = 165252 


053544 004756 PC,$HLT:SEEN AN ERROR. + 60,70, THE, HALT ROUT INE 
053550 :T0 scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


053552 022701 100000 #100000,%0!1 21S LOW ORDER = 100000 
001403 -+10 


004767 004742 PC,$HLT:SEEN AN ERROR. GO TO THE HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 
000244 :TO SCOPE, REPLACE LAST: BEQ my (001403) 
=BY (013746 000172 000207) 


cial 


4 


oS 
N 
Nn— 


ered 
Jao 


Bg 


021527 5 (R5) 4244 
001372 1$ 


:I1F IN WRONG SEQUENCE GO TO THE HLT ABOVF 
053574 005215 (R5) 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


eSesecseueea see 
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CJKDBB.P11 


053576 
053602 


010767 
012700 


022701 
001403 


004767 
000247 


021527 
001372 
005215 


000245 
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INSTRUCTION TESTS 


FERRARA REEREREREEEREREREREERRERREREEEEREKEREREREREEED 


7 TEST:245 


MUL 125252 * %2 = 165252 100000 PS = 11 


BEARER ERERAEEEEEERERERREREEEREREREREEEEERERREREEEREEERREKREK EE 


TST245: MOV 
MOV 


PC, LPADR ;STORE ERROR LOOP ADDRES 
#125252,%0 *LOAD MULTIPLICAND WITH 325252 
2,%0 ‘MULTIPLY 125252 * %2 

a#PSWORD ‘SAVE PS 

a @sPSWORD =: IS PS = 11 

a? 

PC,$HLT:SEEN AN ERROR, GO TO THE HALT ROUTINE 

:PS 1§ WRONG 


:TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (017746 000172 000207) 


hia %0 31S HIGH ORDER = 165252 


pe. $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
SHIGH ORDER 1S WRONG 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 600175 000207) 


at emasaile 1S LOW ORDER = 100000 
+ 


PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;LOW ORDER 


oe OR WRONG SEQUENCE 
;TO SCOPE, REPLA -+10 (001403) 
:BY (013746 000172. 000207) 


(R5) 4245 
1$ 


(RS) :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0291 





CJKDB=B DCF11=AA CPU_DIAG. 
19=JUN=79 10:52 


CJK 


DBB.P11 


053720 
053724 


053726 


053740 


053742 


053750 
053754 


053756 


010767 


022700 
001403 
004767 
000251 
022701 
001403 
004767 
000252 
021527 


001372 
005215 


124274 
125252 


042142 
000011 


004602 


165252 
004566 


100000 


004552 


000246 


MACY711 30A(1052) 


042142 


H 7 
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MUL INSTRUCTION TESTS 


FARRAR ERA RA REE REE EERE RREEREREREKE KEKE 


TEST: 246 


TST246: MOV 


MUL 125252 * (3)+ = 165252 100000 PS = 11 
CAAA KEE EERE EEE RRA ERE EEEEERRERKEERK EER 

PC, LPADR ;STORE ERROR LOOP ADDRESS 

#125252, %0 ‘LOAD MULTIPLICAND WITH 125252 


1$: 


(3)+,%0 ;MULTIPLY 125252 * 
@4PSWORD ;SAVE PS 
ot mata ns 71S PS = 11 


a? 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sPS § WRONG 


:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#165252, 20 z1S HIGH ORDER = 165252 
PC,$HLT;SEEN AN ety sy GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
:10 SCOPE, REPLACE LAST: BEG -+10 (001403) 
:BY (013746 000172 000207) 
#100000, 20:1 :1S LOW ORDER = 100000 
a 
PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
s LOW ORDER Is WRONG OR WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 b00I75" *900207) 
(R5) #246: 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0292 


CJKDB-B DCF11-AA CPU _DIAG. 


CJKDBB.P11 


054004 
054012 
054014 
054920 


054022 


054050 


054052 
054056 
054060 


19=JUN=79 10:52 


010767 


000253 
022700 
001403 
004767 
000254 
022701 
001403 
004767 
000255 
021527 


001372 
005215 


124200 
125252 


042142 
000011 


004506 


165252 
004472 


100000 


004456 


000247 


MACY11 30A(1052) 


042142 


1$: 


I 7 
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MUL INSTRUCTION TESTS 


SEERA EERE AKER EERE REE EREREEEERER EEE 


TEST :247 


FREER RRR REE REE ERE EERE REE EEREREKEREEEREEEKEEEEEREKRE REE 


TST247: MOV 


MUL 125252 * =(3) = 165252 100000 PS = 11 


PC,LPADR : STORE ERROR LOOP ADDRESS 

#125252,%0 ;LOAD MULTIPLICAND WITH 125252 
~(3) ,%0 SMULTIPLY 125252 * =(3) 

@#PSWORD SAVE PS 

—_ :IS PS = 11 

PC,$HLT;SEEN AN el pe THE HALT ROUTINE 


S IS WR 
:T0 scope. REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


—— -%0 1S HIGH ORDER = 165252 
PC, $HLT; SEEN AN ERROR, GO TO i. HALT ROUTINE 
HIGH ORDER IS WRONG 


:10 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


#100000, %0!1 z1S LOW ORDER = 100000 
PC, $HLT:;SEEN AN ERROR, GO TO THE HALT ROUTINE 
LOW ORDER IS WRONG OR WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 
(R5) ,#247 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 


SEQ 0293 


J. 7 
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CJKDBB.P11 19=JUN=79 10:52 MUL INSTRUCTION TESTS SEQ 0294 
14002 FARRAR ERE AREER ERR ERRERER EERE REE KERR 
14003 :TEST:250 MUL 125252 * 2(4) = 165252 100000 PS = 11 
14004 FRAME ERE RE RERERARE ERE REREERER EE KERRREEREREEEEEEREEEERERE RE 
14005 
14006 054062 010767 124104 TST250: MOV PC,LPADR ; STORE ERROR LOOP ADDRESS 
14007 054066 012700 125252 MOV #125252, %0 [LOAD MULTIPLICAND WITH 125252 
14008 054072 070064 000002 MUL 2(4),%0 sMULTIPLY 125252 * 2(4) 

14009 054076 106737 042142 MFPS @4PSWORD Z SAVE PS 

14010 054102 122737 000011 042142 CMPB #11,@4PSWORD sI1S PS = 11 

14011 054110 001403 BEQ +10 

14012 054112 004767 004410 JSR PC,$HLT;SEEN AN ERROR, Go To THE HALT ROUTINE 

14014 054116 000256 256 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
14015 :BY (013746 000172 000207) 

14017 054120 022700 165252 CMP #165252, %0 :1S HIGH ORDER = 165252 

14018 054124 001403 BEQ 

14019 054126 004767 004374 JSR ro smut: SEEN AN ERROR, GO TO THE HALT ROUTINE . 

14020 HIGH ORDER IS WRONG 

14021 054132 000257 257 :10 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
14022 . :BY (013746 000172 000207) 

14024 054134 022701 100000 (MP #100000,%0!1 z1S LOW ORDER = 100000 

14025 054140 001403 BEQ +10 

14026 054142 1$: 

14027 054142 004767 004360 JSR PC,$HLT;SEEN AN oy GO TO THE HALT ROUTINE 

14028 Ow ORDER e WRONG OR WRONG SEQUENCE 
14029 054146 000260 260 TO scopé- REPL AST: BEQ .+10 (001403) 
14030 “BY (013746 bOoT7> 000207) 

14032 054150 021527 000250 CMP (R5) ,4250 

14033 054154 001372 BNE 1$ 3: IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
14034 054156 005215 INC (RS) 


CJKDB=B DCF11=AA CPU_DIAC. 


CJKDBB.P11 


054160 
054164 


054210 
054214 


054216 
054222 
054224 


054230 


054232 
054236 
054240 
054240 


054244 
054246 


054252 
054254 


19=JUN=79 10:52 


010767 


000261 


022700 
001403 
004767 
000262 
022791 
001403 
004767 
000263 


021527 


124006 
125252 
00 


165252 
004276 


100060 


004262 


000251 


MACY11 30A(1052) 


042142 


K 7 
19=JUN=79 11:08 PAGE 295 
MUL INSTRUCTION TESTS 


SERA RERERREEEEEEEREEEEKEERE EE 


3 TEST:251 


FERRER EREREREKEREKEKKKE EK 


TST251: MOV 
MO 


1$: 


MUL 125252 * a(4) = 165252 100000 PS = 1% 


:STORE ERROR LOOP ADDRESS 
Wi 95252, %0 ‘LOAD MULTIPLICAND WITH 125252 
a(4),%0 SMULTIPLY 125252 * a(4 
@APSWORD SSAVE PS 
#11 ,@#PSWORD ‘IS PS = 11 
PC,$HLT: SEEN AN ERROR, GO GO TO THE HALT ROUTINE 


WRONG 
;T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


— -%0 31S HIGH ORDER = 165252 
PC, $HLT; SEEN AN ERROR, GO TO gt HALT ROUTINE 
HIGH ORDER IS WRONG 


HIGH 
:T0 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


ott * Vacca :1S LOW ORDER = 100000 
+ 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; LOW ORDER IS WRONG OR WRONG SEQUENCE 
:70 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
ZBY (013746 000172 000207) 
(R5) ,4251 
1$ 


(R5) 


:1F IN WRONG SEQUENCE GO TO THE HI.T ABOVE 


SEQ 0295 


‘ab 
CJKDB=8 DCF11=AA CPU_DIAG. MACY11 30A(1052)_ 19=JUN=79 11:08 PAGE 296 
CJKDBB.P11 19=JUN=79 10:52 MUL INSTRUCTION TESTS 


FERRER EERE EEEEREREEREEREEERE EERE 


TEST:252 MUL 125252 * a(4)+ = 165252 100000 PS = 11 


FERRARA RRR ERE RRR RE REKEEREEREEEREEEKE EEE EREKERERREKREE EE 


054256 010767 123710 TST252: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
012700 125252 MOV wiesese %0 [LOAD MULTIPLICAND WITH 125252 
)+,%0 “MULTIPLY 125252 * a(4)+ 
042142 AVE PS 


SRP SWORD 3s 
000011 042142 _~— 71S PS = 11 
004216 PC,$HLT;SEEN AN oes ig ne THE HALT ROUTINE 


s Is 
054310 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


054312 922700 165252 #165252, %C z1S HIGH ORDER = 165252 
054320 004767 004202 bc, bate SEEN AN ERROR, GO TO ig HALT ROUTINE 
HIGH ORDER IS WRONG 
054324 000265 STO SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


054326 022701 100000 #100000,%0!1 1S LOW ORDER = 100000 
001403 -+10 


004767 004166 : PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 
000266 :TO SCOPE, REPLACE LAST: BEO .+10 (001403) 


‘BY (01 £740 000172 000207 


021527 (R5) 4252 
001372 1$ 71F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
054350 005215 (R5) 
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CJKOB=8 DCF11=AA CPU_DIAG. MACY11 30A(1052)_ 19=JUN=79 11:08 PAGE 297 
CJKDBB.P11 19=JUN=79 10:52 MUL INSTRUCTION TESTS SEQ 0297 


14107 LAR EEE EERE ERE EERE EEE EERE 


14108 ;TEST:253 MUL 125252 * a-(4) = 165252 100000 PS = 11 


FARRER KEKE KEKE EEEEREREREKEEEREREREERKKKKEE 


054352 010767 TST253: MOV PC, LPADR ;STORE ERROR LOOP ADDRESS 
12700 1 MOV #125252,%0 *LOAD MULTIPLICAND WITH 125252 
a-(4),%6 ;MULTIPLY 125252 * a=(4 
a4PSWORD PS 
042142 MPB ab @APSWORD 21S. PS = 11 
> 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
§ wRONG 


PS I 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


Nya a ea Se es 
“OVaNOUSWR— 


165252 MP #165252, %0 21S HIGH ORDER = 165252 


054414 004767 004106 BC. SHLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
HIGH ORDER IS WRONG 
054420 :T0 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


954422 022701 100000 #100000,%0!1 1S LOW ORDER = 100000 
001403 -+10 


054430 004767 004072 PC.$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
LOW ORDER IS WRONG OR WRONG SEQUENCE 
054434 000271 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


054436 021527 000253 i) Mere 


054442 $ :1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
054444 (R5) 





CJ 


054446 


054472 
054500 
054502 


054506 


054510 
054514 
054516 


054522 


054524 
054530 
054532 
054536 
054540 
054544 
054546 


054552 


054554 


19=JUN=79 10:52 


010767 


022701 
001403 
004767 
000274 
021527 
001403 
000275 


005215 


123520 
000000 
000004 
000002 
042142 
000000 
004020 


000002 
004004 


000000 
003770 


000254 
003754 


042142 
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CJKDB-B DCF11=AA CPU_DIAG. 
KDBB.P11 


DIV INSTRUCTION TESTS SEQ 0298 


JAAR EHEREKKEKEKREREKRERKEKREE 


DIV INSTRUCTION TESTS 


o 
FREAK AERA KREREREERKERRREKRE 


JERE ERE REE RK RERERERERKEE ERE REREREEEKREREREEEEREREEEKEEKEKEREE 


TEST: 254 DIV 04/ #2=2 REM = 0 PS = 0 


FARRER ERE ERKEEEEEEEKEKRKEREEREREEERKEREREEEREEREREREREKERERKE 


TST254: MOV PC,LPADR STORE ERROR LOOP ADDRESS 
MOV #0.%0 


. *LOAD HIGH ORDER WITH 0 
MOV #4,%041 “LOAD LOW ORDER WITH 4 
DIV #2,%0 :DIVIDE BY #2 
MFPS @4PSWORD sSAVE P 
a. — 318 PS = 0 
JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
PS 1§ WRONG 
272 ;TO scope REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 
cup 2-20 zIS QUOTIENT = 2 
JSR PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
S QUOTIENT IS WRONG 
273 :T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 
cP #0, 20+1 z1S REMAINDER = 0 
JSR PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sWRONG REMAINDER 
274 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 


sBY (013746 000172 000207) 


CMP (R5) ,4254 
BEQ +10 z1F IN WRONG SEQUENCE GO TO THE HLT 
JSR PC, $HLT; SEEN AN ERROR. GO TO THE HALT ROUTINE 
T IS IN WRONG SEQUENCE 
275 :T0 scopi. REPL AC CE LAST: BEQ .+10 (001403) 
sBY (013746 000172 000207) 


INC (R5) 


B 8 
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SARA RARE AA RARER EEEERARRERERRRREREREEREREREEEREEREEREEEERER EEE 


TEST: 255 DIV -1 -9. / #3 = =3 REM = 0 PS = 10 


FARA ARAR AREER ERARARREAREERARREREREREEEREEREEREEEEREREEEEEREEEEEEREE 


054556 010767 0 TST255: MOV PC LPADR :STORE ERROR LOOP ADDRESS 
0 77 MOV a-1,% [LOAD HIGH ORDER WITH -1 
MOV [LOAD LOW ORDER WITH -9, 
DIV #3,% ‘DIVIDE BY #3 
MF PS ‘SAVE PS 


042142 Ce mate catey 31S PS = 10 
054612 004767 003710 JSR PC, SHLT; SEEN AN wee crane THE HALT ROUTINE 


PS | 
054616 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


054620 177775 #5 %2 31S QUOTIENT = -3 
054626 003674 bc, "bats SEEN AN ERROR, GO TO THE HALT ROUTINE 
: QUOTIENT 1S WRONG 
054632 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600173" 000207) 


054634 022703 000000 #0, 4 :1S REMAINDER = 0 


001403 
004767 003660 Bc. SHLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
WRONG REMAINDER 
000300 :T0 SCOPE. REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


054650 021527 000255 (RS) 255 
054654 001403 +10° :I1F IN WRONG SEQUENCE GO TO THE HLT 
054656 004767 003644 bc, $HLT; SEEN AN ERROR. GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUENCE 
054662 090301 :10 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
tBY (013746 000172 000207) 


054664 005215 
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FERRER ERE EERE EERE REE REREEEEKEEKEEKEE 


3 TEST:256 DIV 09. / #2=4 REM = 1 PS = 0 


TTT t iti iri iter i elit iti Titi titittiritittititititritiTry) 
010767 123300 TST256: MOV PC,LPADR STORE ERROR LOOP ADDRESS 
MOV R5,R1 ;SAVE R5 


000000 :LOAD HIGH ORDER WITH 0 
000011 OAD LOW ORDER WITH 9. 
05471 000002 I 2,44 {DIVIDE BY #2 
054710 106737 042142 @4PSWORD :SAVE PS 


O3nels 000000 oe :1S PS = 0 
054724 004767 003576 PC,$HLT;SEEN AN oo 1g yA THE HALT ROUTINE 


PS G 
054730 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


054732 000004 #4, 4 44 z1S QUOTIENT = 4 
054740 003562 7 Pc, $SHLT; SEEN AN ERROR GO TO THE HALT ROUTINE 
TIENT IS WRONG 
054744 :T0 scopé. REPLACE LAST: BEQ .+10 (001403) 
[BY (013746 600172 000207) 


tates: 000001 #1, i 1S REMAINDER = 1 
054754 003546 BC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; WRONG ate tant: 


ON 
054760 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600172 000207) 


054762 R1,R5 :RESTORE R5 
054764 (R5) #256 
054770 001403 +10 ;IF IN WRONG SEQUENCE GO TO THE HLT 
054772 004767 PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUENCE 
054776 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


055000 





dD 8 
CJKDB=B DCF11=AA CPU_DIAG. MACY11 30A(1052)_ 19=JUN=79 11:08 PAGE 301 


CJKDBB.P11 19=JUN=79 10:52 DIV INSTRUCTION TESTS SEQ 0301 
14276 FERRARA REE EREREREEREEEEREREEEREEKR EERE REREREREEER EE 
14277 STEST:257 DIV “1 -9. / #2 = =4 REM = =1 PS = 10 
14278 FOI III IOI IOIIIOI III IOUT TIO TOIT TOTTI TTT ih ik tek 
142 
14280 055002 010767 123164 TST257: MOV PC,LPADR ySTORE ERROR LOOP ADDRESS 
14281 055006 012700 177777 MOV #-1,%0 ;LOAD HIGH ORDER WITH ~1 
14282 055012 012701 177767 MOV #-9. 4041 “LOAD LOW ORDER WITH <9. 

14283 055016 071027 000002 DIV #2,%0 ‘DIVIDE BY #2 

14284 055022 106737 042142 MFPS § a#PSWORD SSAVE PS 

14286 055026 122737 000010 042142 CMPB =: #10, @#PSWORD ~—S IS PS = 10 

14287 055034 001403 BEQ +10 

OSES 055036 004767 003464 JSR PC, $HLT;SEEN AN ene Tg be THE HALT ROUTINE 

14290 055042 000306 306 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
14291 :BY (013746 000172 000207) 

14292 

14293 

14294 055044 022700 177774 CMP #-4,%0 z1S QUOTIENT = 4 

14295 055050 001403 BEQ +10 

14296 055052 004767 003450 JSR PC,$HLT;SEEN AN ERROR GO 19 THE HALT ROUT INE 

14298 055056 000307 307 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
14299 sBY (013746 600172 000207) 

12301 

14302 055060 022701 177777 CMP oe ,%0+1 :1S REMAINDER = -1 

14303 055064 001403 BEQ 

14304 055066 004767 003434 JSR Bc, $SHLT;SEEN AN ERROR. cor 10 THE HALT ROUTINE 

14306 055072 000310 310 :T0 scopé WR OOPLACE LAST: BEQ .+10 (001403) 
16507 :BY (013746 000172 000207) 

14309 055074 021527 000257 CMP (RS) #257 

14310 055100 001403 BEQ +10 zIF IN WRONG SEQUENCE GO TO THE HLT 
14311 055102 004767 003420 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 

14312 sTEST IS IN WRONG SEQUENC 

14313 055106 000311 311 :TO SCOPE, REPLACE LAST: BEQ * (001403) 
16316 =BY (013746 000172 000207) 

14316 055110 005215 INC (RS) 

14317 
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FARRER REE EERE EEKEEREREEERRERE REE 


7 TEST: 260 DIV 02/ #3 =0 REM = 2 PS = 4 


FERRER EARKERAREEREREEEKEEREREREREERREEEEEEEEEREREEEKEEREREREE 


010767 123054 TST260: MOV PC,LFADR : STORE ERROR os ¥ os 
000000 MOV #0,%2 AD WITH 


000002 

177775 DIV # 2 

042142 MFPS 7 SAVE 
000004 042142 CMPB “— IS PS = 4 


BEQ 
055146 004767 003354 JSR PC,$HLT;SEEN AN oo Tg pe THE HALT ROUTINE 


SI 
055152 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600173" 000207) 


055154 000000 #0,%2 1S QUOTIENT = 0 
055160 


+10 
055162 004767 003340 PC, $HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
QUOT ENT IS WRONG 
055166 -¥O scope REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


055170 022703 000002 i 71S REMAINDER = 2 


055174 001403 

055176 004767 003324 PC, $HLT:SEEN AN ERROR . GOTO THE THE HALT ROUTINE 

055202 000314 :TO SCOPE, REPLACE wd BEQ .+10 (001403) 
:BY (013746 000172 000207) 


055204 021527 000260 (R5) 4260 
055210 001403 +10 :1F IN WRONG SEQUENCE 60 10 THE HLT 
055212 004767 003310 PC,$HLT; SEEN AN ERROR, GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUEN NCE 
055216 000315 :TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 


055220 005215 





CJKDB=B8 DCF11=AA CPU_DIAG. 


CJKDBB.P11 


z 
ES 


FERERERE 
SESSSAS 


SF YI 
ate 
NNN 

NO” 


055244 
055250 
055256 
055260 


055264 


055274 
055300 
055302 
055306 
055310 
055314 
055316 


0 
055326 
055332 


055334 
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010767 


022705 
001403 
004767 


000320 


010105 


005215 


122744 


177777 
177776 


000003 
042142 
000004 
003242 


000000 
003226 


177776 
003212 


000261 
003174 
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042142 


DIV INSTRUCTION TESTS 
ht te Pee a ae 


:TEST:261 DIV -1 -2 / #3 = 0 = =2 PS =4 


thls 2 ON TOs Me. SM SiR. EEO a Sofie, SOO A, Ie So, TOPO 
TST261: MOV PC,LPADR :STORE ERROR LOOP ADDRESS 

MOV R5.R1 “SAVE R5 

MOV #-1,%4 ; LOAD HIGH ORDER WITH <1 


MOV #=2,%441 “LOAD LOW ORDER WITH <2 
DIV #3, %4 DIVIDE BY #3 
MFPS @4PSWORD SA VE PS 
CMP #4 AAPSWORD rIS PS = 4 
JSR PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
PS I§ WRONG, 
316 :T0 SCOPE, REPLACE -+10 (001403) 
“BY (013746 600172" *900207) 
CMP 0X4 z1S QUOTIENT = 0 
JSR PC,$HLT:SEEN AN ERROR, GO TO THE HALT ROUTINE 
GUOTIENT IS WRONG 
317 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 000172 000207) 
CMP #2 .xael z1S REMAINDER = -2 
JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sWRONG REMAINDER 
320 370 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 
MOV :RESTORE R5 
CMP (RS). 4261 
BEQ +10° ;IF IN WRONG SEQUENCE GO TO THE HLT 
JSR PC,$HLT; SEEN AN ERROR. GO TO THE HALT ROU? INE 
sTEST IS IN WRONG SEQUENC 
321 710 SCOPE REPL ACE LAST: BEQ NSfo (001403) 
“BY (013746 000175 000207) 
INC (RS) 


SEQ 0303 
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FERRER REE RERERREEREKEREKEEEREKEEREEEREREREREEREREEKKEKEE 


; TEST: 262 DIV -1 <1 / #1 = =1 REM = 0 PS = 10 


FREER REE KERR EKER REE 


010767 122630 TST262: MOV PC, LPADR :STORE ERROR LOOP ADDRESS 
0127 MOV #-1,%0 :LOAD HIGH ORDER WITH -1 
#=-1.%0+1 [LOAD LOW ORDER WITH ~1 
#1,%0 :DIVIDE BY #1 
@4PSWORD [SAVE PS 


000010 042142 #10, @4PSWORD ;:1S PS = 10 
055372 003130 bc. $HLT;SEEN AN ops 18 ne THE HALT ROUTINE 
055376 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


022700 177777 1S QUOTIENT = -1 
001403 +10 
004767 003114 SEEN AN SerieN GO its hes - ta ROUT INE 


TIENT ON 
055412 000323 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
SBY (013746 600172 000207) 


055414 022701 000000 #0,%0+1 IS REMAINDER = 0 
055420 +10 


055422 003100 PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; WRONG ate i at, 


055426 :TO SCOPE, REPLACE BEQ .+10 (001403) 
:BY (013746 600173" $0020") 


055430 021527 000262 - (R5) A262 
055434 001403 +10 ;I1F IN WRONG SEQUENCE GO TO THE HLT 
055436 004767 003064 PC, $HLT;SEEN AN ERROR, GO TO THE HALT vr J INE 
sTEST IS IN WRONG SEQUENC 
055442 000325 3:70 SCOPE REPLACE LAST: ®BEQ he (001403) 
=BY (013746 000172 000207) 


055444 005215 
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AO aan eternity ta ge att a eat ag na neal a tal lates 


: TEST: 263 DIV 00/ #1 =0 REM = 0 PS =4 


FERRER REE REE EREREEEREREREKEEREEE EH 


055446 010767 122520 TST263: MOV PC,LPADR :STORE ERROR LOOP ADDRESS 
000000 MOV #0.%0 LOAD HIGH ORDER WITH 0 
000000 #0,%0+1 ;LOAD LOW ORDER WITH 0 
000001 #1,%0 :DIVIDE BY #1 

042142 @4PSWORD SAVE PS 


055472 122737 000004 042142 MPB #4 , AAPSWORD 71S PS = 
055500 001403 +] 
055502 004767 003020 PC,$HLT; SEEN AN on Ta a THE HALT ROUTINE 


S 1S WR 
055506 000326 :T0 scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


055510 022700 000000 #0, 0,0 z1S QUOTIENT = 0 
055516 003004 Bc, SHLT;SEEN AN ERROR, 60 TO THE HALT ROUTINE 
QUOTIENT IS WRONG 
055522 000327 :10 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


055524 022701 000000 #0, %0+1 :1S REMAINDER = 0 

055530 001403 +10 

055532 004767 002770 PC,$HLT;SEEN AN ERROR GO TO THE HALT ROUTINE 

055536 000330 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


055540 021527 000263 ' (RS) #263 
055544 001403 +10 IF IN WRONG SEQUENCE GO TO THE HLT 
055546 004767 002754 PC, $HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 


1S UENCE 
055552 000331 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 600175 000207) 


055554 005215 
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FREER ERE RARER EERE RRR REERERE HR RE EKER EKREERENKEEEEREEREERR EEK 


TEST: 264 DIV =1 125252 / #2 = 152525 REM = 0 PS = 10 


FERRER RARER REE RRR ERK EEE EKER EER ERE KEE 


055556 010767 122410 TST264: MOV PC LPADR ;STORE ERROR LOOP ADDRESS 
MOV :LOAD HIGH ORDER WITH 
mi 28052. %2+1 :LOAD LOW OR RDER WITH 135252 


I DIVIDE BY 
055576 042142 @4PSWORD :SAVE PS 


055602 122737 000010 042142 #10,a4PSWORD  ;:IS PS = 10 
055610 001403 +10 
055612 004767 002710 PC,$HLT: SEEN AN ERROR 60 10 THE HALT ROUTINE 


PS I 
055616 000332 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


055620 022702 152525 #152525, %2 :1S QUOTIENT = 152525 
055624 001403 +10 
055626 004767 002674 PC, $HLT; SEEN AN ERROR, GO TO THE HALT ROUTINE 
= QUOTIENT IS WRONG 
055632 000333 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


022703 000000 #0,%2+1 71S REMAINDER = 0 
001403 +10 


004767 002660 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAINDER 
000334 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


055650 021527 000264 (RS) #264 
055654 001403 +10 ;1F IN WRONG SEQUENCE GO TO THE HLT 
055656 004767 002644 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTEST IS IN WRONG SEQUENC 
055662 000335 :TO SCOPE, REPLACE LAST: BEQ -* (001403) 
‘BY (013746 600173 000207) 


055664 005215 
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PO alae te a a yr ai et laa ian ara“ eiay mei 


TEST: 265 DIV -1 -1 / #1 = 1 REM = 0 PS = 0 


DIC OIOISISIIUISISIIIIIISIOIOIIIOISIOIOIOISISIOIIOIOIUISIOIIUIOISIOIOIOIOI IOI III TTI TOT TOT TOT OT TTT TIE 
010767 122300 TST265: MOV PC,LPADR STORE ERROR LOOP ADDRESS 
MOV R5,R1 SAVE R5 


177777 LOAD HIGH ORDER WITH 1 
sLOAD LOW ORDER WITH =1 
4 DIVIDE BY #=1 
055710 39P SWORD ;SAVE PS 


033715 ‘ 042142 #0, @4PSWORD :1S PS = 0 
055724 002576 BC, $HLT; SEEN AN ERROR, a THE HALT ROUTINE 


PS IS wR 
055730 :10 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


055732 000001 #1 .X zIS QUOTIENT = 1 
055740 002562 PC,$HLT; SEEN AN ERROR, 7 TO THE HALT ROUTINE 
QUOTIENT IS WRONG 
055744 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


055746 022705 000000 40,4441 21S REMAINDER = 0 
055752 001403 +] 


0 
055754 004767 002546 PC,$HLT;SEEN AN sumed ras ie aon HALT ROUTINE 


NDER 
055760 000340 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 009172 000207) 


055762 010105 sRESTORE RS 
055764 000265 te 4265 
055770 +10 zI1F IN WRONG SEQUENCE GO TO THE HLT 
055772 004767 002530 PC,$HLT, SEEN AN ERROR, GO TO THE HALT ROUT INE 
TEST IS IN WRONG SEQUENC 
055776 :T0 SCOPE, REPLACE LAST: BEQ NSA0 (001403) 
‘BY (013746 000172 000207) 


056000 005215 
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FEAR ERE REREERREREREKEEEEEKREREREREREKEEEEREEERERERRE KEE 


;TEST:266 DIV 25253 1 / #125252 = 100000 REM = 1 


FREER EERE ERE REE ERR EERE REE REAR EERE EE 


010767 122164 TST266: MOV PC,LPADR zSTORE ERROR LOOP ADDRESS 
025253 MOV #25253, 20 :LOAD HIGH ORDER WITH 25253 
000001 #1,%0+4 “LOAD LOW ORDER WITH 1 
125252 #125252,%0 :DIVIDE oY #125252 
042142 @4PSWORD SSAVE P 


59554 000010 042142 MPB a @4P SWORD 71S PS = 10 
056036 002464 BC, TSHLT: SEEN AN ERROR, GO TO THE HALT ROUTINE 
;PS_1§ WRONG 


Ss 
056042 :TO SCOPE, REPLACE LAST: BE .+10 (001403) 
:BY (013746 000172 000207 


056044 922700 100000 #100000, %0 zIS QUOTIENT = 100000 
056052 004767 002450 bt SHUT: SEEN AN ERROR, 60 TO THE HALT ROUTINE 
QUOTIENT IS WRONG 
056056 000343 :10 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (913746 000172 000207) 


022701 000001 co ee IS REMAINDER = 1 


0 
002434 PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; WRONG REMAINDER 
:TO SCOPE, REPLACE BEQ .+10 (001403) 
‘BY (013746 bOOT 7D. $$00207) 


056074 021527 (RS) 4266 
056100 001403 +10 zIF IN WRONG SEQUENCE GO TC THE HLT 
056102 004767 ec, $HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTEST IS IN WRONG SEQUENC 
056106 000345 ;TO SCOPE REPLACE LAST: BEQ -* (001403) 
“BY (013746 000175 000207) 


056110 005215 
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SEEKER ERK EERE EKER EEEEEREKKEE 


:TEST:267 DIV 37777 77777 / #77777 = 77777 REM = 77776 


FRA RRR RRR ERE EERE ERE EKER EKER REE KK 


056112 010767 122054 TST267: MOV PC, LPADR zSTORE ERROR LOOP ADDRESS 
037777 MOV #37777,%2 [LOAD HIGH ORDER WITH 37777 
077777 #77777 .%2+1 [LOAD LOW ORDER WITH 77777 
077777 DIV #77777 .%2 DIVIDE oY #77777 

056132 042142 @APSWORD SSAVE P 


056136 122737 000000 042142 MPB #0, A4PSWORD 71S PS = 0 
056144 001403 +] 
056146 004767 002354 PC,S$HLT;SEEN AN os ig ny A THE HALT ROUTINE 


S 
056152 000346 ;T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


056154 022702 077777 W777. 42 z1S QUOTIENT = 77777 

056162 002340 PC,$HLT;SEEN AN SOUT ENT is RON _ ROUTINE 

056166 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 600175 000207) 


056170 022703 077776 #77776, %2+1 31S REMAINDER = 77776 
056174 001403 +10 


056176 004767 002324 PC,$HLT; SEEN AN Sport REMAIN Me. HALT ROUTINE 


NDE 
056202 000350 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
‘BY (013746 600175 000207) 


056204 021527 000267 (RS) ,4267 
056210 001403 +10 ;I1F IN WRONG SEQUENCE GO TO THE HLT 
056212 004767 002310 PC,$HLT:SEEN AN ERROR, ‘GO TO THE HALT ROUT INE 
TEST IS IN WRONG SEQUENC 
056216 000351 :T0 SCOPE, REPLACE LAST: BEQ MF (001403) 
7BY (013746 000172 000207) 


056220 005215 
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FERRER 


;TEST:270 DIV 0 100000 / #2 = 40000 REM = 0 PS = 0 


FERRER EKER RERERKEEKEEKEEKEREREEEREER ERE KEKE 
056222 010767 121744 TST270: MOV PC,LPADR zSTORE ERROR LOOP ADDRESS 
MOV R> RI sSAVE R5 

000000 [LOAD HIGH ORDER WITH 0 

100000 #160000, %4+1 [LOAD LOW ORDER WITH 100000 

000002 #2,% “DIVIDE BY #2 
056244 042142 Seb SUORD TSAVE PS 
056250 000000 042142 MPB #0, @4PSWORD :IS PS = 0 
056260 002242 bc, $HLT; SEEN AN ERROR 60 TO THE HALT ROUTINE 


S 1S WR 
056264 :T0 scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


056266 040000 ot ote 44 1S QUOTIENT = 40000 
056272 


056274 004767 002226 ee $HLT; SEEN AN ERROR, GO TO THE HALT ROUTINE 
QUOT TENT IS WRONG 
056300 :TO scope REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


056302 000000 #0,%4+1 71S REMAINDER = 0 
056306 +4 


: 0 
056310 002212 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAINDER 
056314 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


056316 010105 ZRESTORE R5 
021527 000270 (RS). 4270 
001403 +10 : IF IN WRONG SEQUENCE GO TO THE HLT 
056326 004767 002174 PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
sTEST I IN WRONG SEQUENCE 
056332 000355 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
BY (013746 600175 000207) 


056334 005215 
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FERRER EERE EKKEKEKREEEEEKREEKEERRERREEEREKKEE 


:TEST:271 DIV 177777 77777 / #177776 = 40000 REM = 177777 


FERRER ERE EKEREEREEEREREREEAEREKEEKEREEEREKEREREKEKKEEEE EE 


010767 121630 TST271: MOV C,LPADR :STORE ERROR LOOP ADDRESS 
0127 MOV LOAD HIGH ORDER WITH_177777 
;LOAD LOW ORDER WITH 77777 
:DIVIDE BY #177776 


SH SWORD 
042142 MPB irae 71S PS = 0 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
3PS 1§ WRONG 


3:70 SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


rs) %0 1S QUOTIENT = 40000 


bc. y 9 SEEN AN ERROR, be TO THe HALT ROUTINE 
QUOT TENT Js WRONG 
:TO scopé REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


177777 wt a -%0+1 1S REMAINDER = 177777 


002100 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
ONG REMAINDER 
:T0 SCOPE. REPLACE LAST: BEG .+10 (001403) 
:BY (013746 000172 000207) 


000271 (R5) 271 
;I1F IN WRONG SEQUENCE GO TO THE HLT 
002064 pe. $HLT; SEEN AN ERROR, GO TO THE HALT ROUT INE 
ST IS IN, WRONG SEQUENC 
:T0 SCoPE SEPLACE LAST: BEQ NFO (001403) 
*BY (013746 600175 000207) 


SEQ 0311 
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056472 
056500 
056502 
056506 


056510 
056514 
056516 


056522 


056524 
056530 
056532 
056536 
056540 
056544 
056546 


056552 


056554 


010767 


122737 
001403 
67 


022702 


022703 
001403 
004767 
000364 
021527 
001403 
004767 
000365 


005215 


121520 


000001 
002004 


000000 
001770 


000272 
001754 


MACY11 30A(1052) 


042142 


BY 
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evest:272=«OY.—i«O S2528 7 Ss || CNS ek ee 


TEST:272 


TST272: MOV 


DIV 0 52525 / #52525 = REM = 0 PS = 0 
heli oh SO 5 AOE Re 2. RM Ct TR. bd SN Sh 

PC,LPADR :STORE ERROR LOOP ADDRESS 

[LOAD HIGH ORDER WITH 0 

#52525 ,,%2¢1 SLOAD LOW ORDER WITH 52525 

#52525. %2 SDIVIDE BY #52525 

@APSWORD SSAVE PS 

#0, @A4PSWORD :I1S PS = 0 


BC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;PS_1§ WRONG 


S 
zTO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


Wty 71S QUOTIENT = 1 
PC, $HLT; SEEN AN cenit GO TO THE HALT ROUTINE 
UOTIENT IS WRONG 


sto scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


—— 1S REMAINDER = 0 
PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
WRONG REMAINDER 


TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 600172 000207) 


(RS) M272 
;1F IN WRONG SEQUENCE GO TO THE HLT 
bc, $HLT;SEEN AN ERROR, GO TO THE HALT re J INE 
TEST IS IN WRONG SEQUENC 
:T0 Scope REPLACE LAST: BEQ - (001403) 
:BY (013746 000172 000207) 


(R5) 


SEQ 0312 


CJKDB-B DCF11=AA CPU DIAG. 
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CJKDBB.P11 


056556 


010767 


121410 
000000 
077777 
000000 
042142 
000014 
000003 
001700 


000273 
001662 


MACY11 30A(1052) 


042142 
042142 
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DEES IIIIIIE IEEE EERE EERE RHEE ER EEE EERE EERE ES 


; TEST:273 


DIV 0 77777 / #0 = DUMMY REM = DUMMY PS = 3 


FARRER REE EEE KEKE EERE EEE 


TST273: MOV 
MOV 


PC,.LPADR STORE ERROR LOOP ADDRESS 
R5,R1 SAVE R5 


#0,%4 {POAD HIGH ORDER WITH 0 
#77777, %441 ;LOAD LOW ORDER WITH 77777 
0,%4 ‘DIVIDE BY #0 
TSAVE PS 


@4PSWORD 
#14, QAPSWORD 
#3 ,AAPSWORD rIS PS = 3 
PC,$HLT;SEEN AN ERROR Go To THE HALT ROUTINE 

:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 

:BY (013746 000172 000207) 
ZRESTORE R5 
ins). A273 

;1F IN WRONG SEQUENCE GO TO THE HLT 
oy $HLT; SEEN AN ERROR. GO TO THE HALT ROUT INE 
S IN WRONG SEQUENC 


sTEST I 
:T0 SCOPE REPLACE LAST: BEQ * (001403) 
=BY (013746 000172 000207) 


SEQ 0313 
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CJKDBB.P11 


056702 
056710 
056712 


056716 


056720 
056724 
056726 


056732 


056734 


010767 
012700 


122737 
001403 
004767 


000370 


021527 
001403 
004767 
000371 


005215 


001610 


000274 
001574 


MACY11 30A(1052) 


042142 
042142 
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FREAK RERREEEEREKEKEEREREREEEEKEREEEREEREKERERERERERKKE KER 


:TEST:274 


DIV 77777 177777 / #2 = DUMMY REM = DUMMY 


FERRER REE EEE EREEKKEEEEKEREERREREREREEEREEREEEEREREREKEKE 


TST274: MOV 
MOV 


;STORE ERROR LOOP ADDRESS 
Weoo7D £0 zLOAD HIGH ORDER WITH 3377 
#177777, L0+1 ZLOAD LOW ORDER WITH 177777 
#2,%0 “DIVIDE BY #2 

@4PSWORD TSAVE PS 

#14, aAPSWORD 


We, @4PSWORD 71S PS = 2 
Bc, SHLT;SEEN AN “pe it A THE HALT ROUTINE 


S IS WR 
TO scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


wr A274 
;IF IN WRONG SEQUENCE GO TO THE HLT 
te $HLT; SEEN AN ERROR. GO TO THE HALT owidf INE 
sTEST IS IN WRONG SEQUENC 
3:70 SCOPE REPLACE LAST: BEQ MeO (001403) 
“BY (013746 000172 000207) 


SEQ 0314 
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056736 012702 000002 MOV 
056742 0 042204 MOV 
056746 042206 MOV 


1es7:275—siYs(“(‘ | SE Pe Cnet pa ot 


3 TEST:275 DIV 0 52525 / S9 = 25252 REM = PS = 0 


Aa lk OO Ii SM eR ine TOO vp eels FOTO Dds. 


056752 121214 TST275: MOV PC, oo ;STORE ERROR LOOP ADDRESS 
000000 MOV r [LOAD HIGH ORDER WITH 0 
#53855, %0+1 : LOAD LOW ORDER with 52525 
056766 I $9, %0 DIVIDE BY S9 
056772 aA#PSWORD SAVE PS 
pogre 042142 nO, @4PSWORD siS PS$ = 0 
057006 001514 bc, "hats SEEN AN “ps 18 re THE HALT ROUTINE 


“Pp 
057012 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


peta 025252 vet 40 31S QUOTIENT = 25252 
057022 001500 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; QUOT TENT IS WRONG 
057026 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


edit 022701 #1,%0+1 31S REMAINDER = 1 

0570 001403 +40 

004767 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
; WRONG ata canis 


000374 3;TO SCOPE REPLACE T: BEQ .+10 (001403) 
=BY (013746 600173" *000209) 


021527 000275 (R5) A275 
001403 +10 :IF IN WRONG SEQUENCE GO TO THE HLT 
057052 004767 001450 Pc. $HLT;SEEN AN ERROR, GO TO THE HALT ROUT INE 
sTEST IS IN WRONG ‘S SEQUENC 
057056 000375 :TO SCOPE, REPLACE L BEQ wie (001403) 
‘BY (013746 600175" $0207) 


057060 005215 
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FARRAR EERE EERE EERE 


;TEST:276 DIV 0 52525 / aS10 = 25252 REM = 1 PS = 0 


FERRARA REE REEEREE EEE REE AKEERERRREKEREEREREREEREEEEEEEREREEEE 


010767 121104 TST276: MOV PC,LPADR :STORE ERROR LOOP ADDRESS 
012700 MOV #0.% ;LOAD HIGH ORDER WITH 0 
#52525, %0+1 ‘LOAD LOW ORDER WITH 52525 
DI as10,%0 ‘DIVIDE BY aS10 
057102 106737 042142 @4PSWORD SAVE PS 


ga 10e 000000 042142 MPB oe 71S PS = 0 
057116 001404 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;PS 1§ WRONG 


S 
057122 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
. tBY (013746 000172 000207) 


057124 022700 025252 #25252, %0 z1S QUOTIENT = 25252 

057130 001403 +10 

057132 004767 001370 PC,$HLT;SEEN AN ERROR | GO 19 THE E HALT ROUT INE 

057136 000377 7 ;TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
sBY (013746 000173 000207) 


057140 022701 000001 #1,%0+1 21S REMAINDER = 

057144 001403 +10 

057146 004767 001354 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAINDER 


ON 
057152 000400 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


057154 021527 000276 (R5) ,4276 
057160 001403 +10 3 IF IN WRONG SEQUENCE GO TO THE HLT 
057162 004767 001340 PC, $!'LT;SEEN AN ERROR. GO TO THE HALT — 
TEST IS IN WRONG SEQUENC 
057166 000401 zTC SCOPE, REPLACE LAST: BEQ ie (001403) 
:BY (013746 000172 000207) 


057170 005215 
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STEST:277 «DIV. sO $2525 / Oe 2 2 :::C ee 


:TEST:277 DIV 0 52525 / a#S9 = 25252 REM = PS = 0 


| paaananahitiennandneaannhetadieaamiakacdianndmentaanniieeten 


057172 010767 120774 1ST277: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 
000000 MOV #0,%0 ;LOAD HIGH ORDER WITH 0 
#52525, %041 [LOAD LOW ORDER WITH 52525 
0 $9, %0 :DIVIDE BY a#s9 
057212 1 042142 aAPSWORD “SAVE PS 


057216 122737 000000 042142 MPB #0 , A#PSWORD 71S PS = 0 
057224 001403 +] 
057226 004767 001274 PC,S$HLT; SEEN AN oe ig be THE HALT ROUTINE 


057232 000402 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 900207) 


057234 022700 025252 #25252, %0 z1S QUOTIENT = 25252 
057240 001403 +10 
057242 004767 001260 bc. $HLT;SEEN AN cart GO TO THE HALT ROUTINE 
UOTIENT IS WRONG 
057246 000403 :T0 scope. REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


057250 022701 000001 #1, el 1S REMAINDER = 1 


057254 
057256 001244 bc, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAINDER 
057262 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021527 000277 (R5) 4277 
001403 +10° 3; IF IN WRONG SEQUENCE GO TO THE HLT 
057272 004767 001230 bc. $HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUENCE 
057276 000405 TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


057300 005215 
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CJKDBB.P11 


057302 
573 


057320 
057324 


05734 
087350 
057354 
057356 
0 


57362 
057364 


057370 


057372 


010767 


022700 
001403 
004767 


000407 


022701 


021527 
001403 
004767 


005215 


120664 
000000 
052525 
042142 
000000 
001166 


025252 
001152 


000001 
001136 


000300 
001122 


MACY11 30A(1052) 
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DIV INSTRUCTION TESTS 


FRR RRR ERE ERE EEE ERE REE ERE KEE KEREEEEEKEERKRE EEE 


TEST: 300 


DIV 0 52525 / %2 = 25252 REM = 1 PS = 0 


FREE REE EEE ERE REE REE KEKE REE EERE 


TST300: MOV 
MOV 


PC,LPADR ;STORE ERROR LOOP ADDRESS 
r =LOAD HIGH ORDER WITH 0 
#52525, %0+1 [LOAD LOW ORDER aie 52525 
%2,%0 :DIVIDE BY %2 

@APSWORD SSAVE PS 


#0, AAPSWORD rIS PS = 0 
PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sPS 1§ WRONG 
:TO0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 
#25282, %0 z1S QUOTIENT = 25252 
be. oat: SEEN AN ERROR. R60 19 TH THE E HALT ROUT INE 
:T0 scopé. UREPEACELT AST. BEQ .+10 (001403) 
“BY (013746 000175 000207) 
#1, 1.2041 :1S REMAINDER = 1 
bc, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAINDER 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


(RS) 4300 
+10 :1F IN WRONG SEQUENCE GO TO THE HLT 
BC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
s TEST 1S IN WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


SEQ 0318 
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SAAR RRR EERE RARER EERE RRR ERE REREKEREEERREREREK EEE 


TEST: 301 DIV 0 52525 / (3)+ = 25252 REM = 1 PS = 0 


SERRE REE EERE ERE EERE 


057410 010767 120556 TST301: MOV PC LPADR ;STORE ERROR LOOP ADDRESS 
000000 MOV SLOAD HIGH ORDER WITH 0 
052525 #90523 %0+1 SLOAD LOW ORDER WITH 52525 
(3)+,%0 SDIVIDE BY (3)+ 
057426 042142 S#PSWORD ‘SAVE PS 


057432 122737 000000 042142 #0, A#PSWORD 71S PS = 0 
057440 001403 +10 
057442 004767 001060 PC,$HLT;SEEN AN oe ts ne A THE HALT ROUTINE 


PS 
057446 000412 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


057450 022700 025252 #252: 52,%0 z1S QUOTIENT = 25252 
057456 001044 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
QUOTIENT IS WRONG 
057462 ;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


057464 022701 000001 1, %0+1 :1S REMAINDER = 1 
057470 001403 +10 
057472 004767 001030 PC,$HLT:SEEN AN ERROR, GO TO THE HALT ROUTINE 
WRONG REMAINDER 
057476 000414 :T0 scope REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021527 000301 wits 4301 


iI 
001014 PC, $HLT:SEEN AN ERROR, GO TO THE HALT ROUT INE 
TEST IS IN WRONG SEQUENCE 
057512 :T0 SCOPE, REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


F_IN WRONG SEQUENCE GO TO THE HLT 


057514 005215 
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SERA EERE EERE EERE RE ERE EHREEEE EERE EE 


: TEST: 302 DIV 0 52525 / =(3) = 25252 REM = 1 PS = 0 


ITITISTT ITI LISI TITITI TIT TTTT TITTLE TT TTT TETTTITITT TTT TTT TTT TTT tte 


057516 120450 TST202: MOV PC, LPADR :STORE ERROR LOOP ADDRESS 
700 000000 MOV r [LOAD HIGH ORDER WITH 0 
052525 Wi obes %0+1 SLOAD LOW ORDER WITH 52525 
I ),%0 :DIVIDE BY =(3) 
042142 aap SSpRD *SAVE PS 


eleay] 000000 042142 — :iS PS = 0 
057550 000752 PC,$HLT;SEEN AN ERROR, i THE HALT ROUTINE 


PS 1S wR 
057554 :T0 scope REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


057556 psec oe 025252 w25252, 20 :IS QUOTIENT = 25252 
004767 000736 BC, $HLT;SEEN AN eOUSTIEN GO ; ty aa" ROUT INE 


057570 000417 :TO SCOPE REPT ACE LAST: BEQ .+10 (001403) 
[BY (013746 600172 000207) 


057572 544) #1, a :1S REMAINDER = 1 
004 767 BC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WR REMAINDER 


ONG 
000420 TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


021527 000302 (R5) ,#302 
+1 ;IF IN WRONG SEQUENCE GO TO THE HLT 
057614 000706 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
TEST 1S IN WRONG SEQUENCE 
057620 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


057622 
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SEERA ERE ERE EERE ORR EEK EERE REE 


TEST: 303 DIV 0 52525 / 2(4) = 25252 REM = 1 PS = 0 


SKEET REE KEKE KERR EERE 


057624 010767 120342 TST303: MOV PC,LPADR :STORE ERROR LOOP ADDRESS 

057630 000000 MOV # ;LOAD HIGH ORDER WITH 0 
052525 #52525 ,%0+1 ZLOAD LOW ORDER WITH 52525 
042142 MFPS § @A#PSWORD ‘SAVE PS 


MOV 
DIV 2(4),%0 :DIVIDE BY 2(4) 
000000 042142 a #0 , APSWORD 71S PS = 0 
.+ 
000642 JSR PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;PS_ IS WRONG 


:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


025252 ei” ena 21S QUOTIENT = 25252 
+ 


057674 004767 000626 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
QUOTIENT IS WRONG 
057700 ‘ :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


057702 022701 a IS REMAINDER = 1 
+ 


057706 001403 . 
057710 004767 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAINDER 
057714 000424 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


057716 021527 000303 i aoa 
+ 


057722 001403 ; IF 
057724 004767 000576 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTEST IS IN WRONG SEQUENCE 
057730 000425 zTO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


IN WRONG oo ge GO By HLT 


057732 005215 


7 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
5 
1 
} 
1 
1 
1 
1 
4 
} 
1 
1 
1 
1 
1 
; 
1 
: 
1 
} 
1 
1 
: 
1 
1 
1 
1 
, 
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FERRER EKER EEE ERE EERE EERE EERE 


TEST: 304 DIV 0 52525 / a(4) = 25252 REM = 1 PS = 0 


FREER EKER EERE EERE EKER EEREKEREREREKERER KKK KER 


010767 120232 TST304: MOV PC,LPADR :STORE ERROR LOOP ADDRESS 
012700 000000 MOV ;LOAD HIGH ORDER WITH 0 
052525 MOV #52525, %0+1 TLOAD LOW ORDER WITH 52525 
000000 DIV a(4),%0 ‘DIVIDE BY a 
057754 106737 042142 MFPS § @#PSWORD TSAVE PS 


057760 12 000000 CMPB #0, @PSWORD 71S PS = 0 
057766 BEQ +10 
057770 000532 JSR ®¢,$HLT;SEEN AN wt § thos THE HALT ROUTINE 


S 1§ 
057774 :T0 scope. REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


OWOONAULSWN—OOONOUS 


057776 025252 wi 20 21S QUOTIENT = 25252 
06000 


000516 be $HLT;SEEN AN ERROR, * TO THE HALT ROUTINE 
:Q) TIENT TTS | WRONG 
3:70 SCOPE REPLA AST: BEQ .+10 (001403) 
‘BY (013746 600175 000207) 


SESBMYMNYn mn & & & EE 


KALAVKS 


Oo 
N 


gyal 000001 < we 31S REMAINDER = 1 
004767 000502 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
;WRONG REMAIN 


DER 
000430 ;TO SCOPE REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


021527 000304 (RS) ,#304 
001403 +10 :1F IN WRONG SEQUENCE GO TO THE HLT 
004767 000466 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTEST IS IN WRONG SEQUENCE 
000431 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
“BY (013746 600175 000207) 


68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 


00 00 
WM 


005215 
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SRR 


TEST: 305 DIV 0 52525 / a(4)+ = 25252 REM = 1 PS = 0 


FRA RE KREERKERERKERE KEE EKERE ERE EEEKEEREKEEEEEEREKREREREREEEREKE KEKE K 


010767 120122 TST305: MOV PC,LPADR zSTORE ERROR LOOP ADDRESS 

012700 000000 MOV #0. %0 :LOAD HIGH ORDER WITH 0 
052525 #52525, %0+1 ZLOAD LOW ORDER WITH 52525 

a(4)+,%0 [DIVIDE BY a(4)+ 

042142 @4PSWORD ZSAVE PS 


heel ae 000000 042142 MPB #0, A4PSWORD 71S PS = 0 
.+ 
004767 000424 PC,$HLT;SEEN AN ERROR, ne THE HALT ROUTINE 


sPS _IS 
000432 :TO SCOPE, REPLACE LAST: «+10 (001403) 


BEQ 
:BY (013746 000172 000207) 


MAMI MAUTIUT 


ee el Dd ed ed 
SYLSLOL GIG SBRmROm™ 


is 


022700 025252 #25252,%0 31S QUOTIENT = 25252 
001403 + 


004767 000410 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
SQUOTIENT IS WRONG 
000433 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


022701 000001 a i 31S REMAINDER = 1 


.+10 
000374 PC,$HLT;SEC's AN ERROR, GO TO THE HALT ROUTINE 
sWRONG REMAINDER 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


000305 MP (R5) 4305 
a zIF IN WRONG SEQUENCE GO TO THE HLT 
000360 PC,$HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sTEST iS IN WRONG SEQUENCE 
:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


— 

Vv 
MNnronrw 
MN 
Who 


005215 
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FREAK EAE EERE EKEEKEKRKEREEE EERE 


; TEST: 306 DIV 0 52525 / a@(4) = 25252 REM = 1 PS 


FREAK EEK EERE KKK 


010767 120014 TST306: MOV PC,LPADR ;STORE ERROR LOOP ADDRESS 

012700 000000 MOV r “LOAD HIGH ORDER WITH 0 
052525 MOV #52525, %0+1 SLOAD LOW ORDER WITH 52525 

DIV a-(4>, £0 “DIVIDE BY a=(4 

042142 MFPS @4PSWORD + SAVE PS 

122737 000000 042142 CMPB ss #0, @# PSWORD r1S PS = 0 

001403 BEQ +10 

004767 000316 JSR PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 

:PS IS WRONG 


:TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 
:BY (013746 000172 000207) 


025252 wri Too 2%0 21S QUOTIENT = 25252 


000302 PC,$HLT;SEEN AN ERROR. GO TO THE HALT ROUTINE 
QUOTIENT IS WRONG 
STC § SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


022701 000001 #1,%0+1 31S REMAINDER = 1 
007403 +10 
004767 


000266 PC, $HLT;SEEN AN ERROR, GO TO THE HALT ROUTINE 
sWRONG REMAINDER 

000440 :TO SCOPE, REPLACE LAST: BEQ .+10 (001403) 

:BY (013746 000172 000207) 


021527 000306 (R5) ,#306 
001403 +10 ;IF IN WRONG SEQUENCE GO TO THE HLT 
004767 000252 PC,$HLT;:SEEN AN ERROR, GO TO THE HALT ROUTINE 
TEST IS IN WRONG SEQUENCE 
000441 :T0 SCOPE REPLACE LAST: BEQ .+10 (001403) 
=BY (013746 000172 000207) 


005215 
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013746 000004 a4 ,~(SP) sSAVE LOCATION 4 IN STACK 
0 060300 000004 #1$ ,a44 SET UP TIME OUT _TRAP VECTOR 
000001 164000 #1 ,a4164000 STURN OFF MULTI-TESTER 
000004 : (SP) +,@44 RESTORE LOCATION 4 
177777 i #-1 :TYPE ID. THE FIRST PASS 
SKPMSG BRANCH AROUND AFTER THE FIRST PASS 


T -MSG1 
117774 : CMPB HAPTENV, SENV 
B $SEOP 


PASSPT SHOULD PRINT THIS PASS? 
001744 #17 ,PASSPT DID 17-OCTAL PASSES YET? 
BREOP :1F YES, BRANCH TO EOP 


JMP @ARESTRT + JUMP TO RESTART 
eASCIZ = <15><12>*CJKDB=-B DCF11=AA CPU DIAG. *<15><12> 


027107 005015 


- EVEN 
-SBTTL ** ROUTINES LIST ** 


012767 177777 001670 BREOP: MOV #-1 ,PASSPT RESET PASSPT 
-SBTTL END OF PASS ROUTINE 


FIR IOI III OI III III I TAS IAA SAIS ASISIS IIIS IIIS IIIS ASIII ISI IAISIAAISIAIANI AIM 
;* INCREMENT THE PASS NUMBER (S$PASS) 

z*TYPE "END PASS #XXXXX'* (WHERE XXXXX IS A DECIMAL NUMBER) 

[*IF THERES A MONITOR GO TO IT 

:*IF THERE ISN'T JUMP TO RESTRT 


SEOP: 


$PASS : INCREMENT THE PASS NUMBER 
117656 1 od aliens : DON'T ALLOW A NEG. NUMBER 
+ 


SEOPCT: a 


=) 
w 


SESsearancs 


SDOAGN 77 YES 
(PC)+,a(PC)+ 7zRESTORE COUNTER 
SENDCT: . 1 


060511 . SENDMG Bae | "END PASS #°' 
117632 MOV $PASS ,~(SP) AVE $PASS FOR TYPEOU 
£320 TYPE==DEC IMAL aScl I WITH SIGN 
060506 23 TYPE A NULL CHARACTER 
000042 $GET42: 42 


MAMA MAMA AMA aA a UT 


INWWAIWNWNIWNNWWNWWW 


NONIDIR @ A a 


SENDAD: J PC, (RO) 
NOP 


$DOAGN: 
000137 MP a(PC)+ ; sRETURN 
001024 $RTNAD: . RESTRT 


RR SS SS oo 
MOA MAA UAL 


WW 
WHS 0ONAUSWN—O 
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377 377 000 $ENULL: .BYTE - ::NULL CHARACTER STRING 
015 042412 042116 $ENDMG: .ASCIZ <igoeio> sem PASS #/ 
950040 051501 020123 


-SBTTL HALT ROUTINE 
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HALT ROUTINE 


PROGRAM COMES HERE ON ENCOUNTERING ANY ERROR 


Bag 


MEW —OVOONAUSINN—OO 


017637 Roe 000302 $HLT: @(SP) ,@MSFATAL ;PLACE THE ERROR NUMBER AT LOCATION $FATAL 
0 06071 (SP) ,a4#CONTIN  ;SAVE ERROR NUMBER ADDRESS 
020000 161444 arises HAS THE OPERATOR ASKED TO SUPRESS ERROR TYPE OUTS 


042224 -SCRLF :GO AND TYPE A CR, LF, FOLLOWED BY 3 SPACES 
060654 »-MSGERR : INFORM ERROR 
042224 , SCRLF :GO_AND TYPE A CR, LF, FOLLOWED BY 3 SPACES 
060714 @ACONTIN,=(SP) ;RETREIVE ERROR NUMBER ADDR 

#4, (SP) see ERROR PC 


TYPE PC 
042224 -SCRLF :GO_AND TYPE A CR, LF, FOLLOWED BY 3 SPACES 
000302 MOV @ASFATAL ,~(SP) iRE TREIVE ERROR NUMBER 

TYPE ERROR NUMBER 


al ce ed ae ce ced cl cd ced ced eae eed 


DAAA AA AGIA VIO VI UII 
Ww 


AAAAAARE REE EEL EL 


3 
0 
117502 : SENV ;1F WE ARE NOT UNDER APT. THEN GO TO 
000300 IN QASMSGTY : OTHERWISE INFORM APT. ABOUT SEEING THE ERROR 
042224 8$: “ $CRLF =GO AND TYPE A CR, LF, FOLLOWED BY 3 SPACES 
ON ERROR ? 


161354 Q@SWR ;IS IT REQUIRED TO HALT 
BP 10$ IF NOT THEN GO TO 10$ 


inet 
Beas 


060714 10$: @ACONTIN,=(SP) ; 
000002 #2, (SP) ; CALCULATE RETURN ADDRESS 


RTS PC 
051122 051117 MSGERR: .ASCIZ / ERROR! PC, ani ERROR # ARE: / 
020040 


SRESEEES 


$3 


051101 035105 


NN 
Whoo 


-WORD 0 
POWER FAIL ROUTINE 
MOV A#PWRUP , 24 


WWNWWWW 
N 


wm 
N 
BISARA 


117100 


117070 
MOV #BUFF ,SP 

117353 WILL APT ALLOW PRINTING? 
BN PFRES NO 


3GET MSG ADDR. 

s TTY READY 

sNO WAIT 

;PRINT CHARACTER 
;NEXT IF NOT DONE. 


WAG 


SERESSES 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


MOANA AM AVIA A UI UA TUT TUT TU 
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105737 177564 PWAIT1: TSTB a4TPS 
100375 BP 


L PWAIT1 
120022 PFRES: JMP RESTRT 
005015 047520 042527 MSGPWF: .ASCIZ <15><12>.POWER FAILED!. 
020122 040506 046111 
042105 000041 


SEQ 0328 


-EVEN 
-SBTTL TYPE ROUTINE 


OUI III III OI I SOIT SORIA AI III SASSI IIIS SII IANS SASS AI AIAN NANAAASASAAA 
;*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
 *THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED 
;*NOTE1: S$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
S$FILLC CONTAINS THE CHARACTER TO FILL AFTER. 


> *CALL: 

1) USING A TRAP INSTRUCTION 
a YPE ,MESADR 

t* 


zsMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


TYPE 
MESADR 


4 
4 
4 


105767 000261 $ $TPFLG 3271S THERE A TERMINAL? 
100002 BP 1$ :-BR IF YES 
000000 2 ¢HALT HERE IF NO TERMINAL 

3$ 5st VE 

: RO,-(SP) 
600002 @2(SP) ,RO 
000001 117250 MODE 
sNO,GO CHECK FOR APT CONSOLE 

000100 117241 — 37SPOOL MESSAGE TO APT 


2sNO,GO CHECK FOR CONSOLE 
000004 RO,61$ ;7SETUP MESSAGE ADDRESS FOR APT 
000230 catia 


000040 117217 #APTCSUP , SENVM 


SAVE RO 
SIGET ADDRESS OF ASCIZ STRING 
Caters ¢ «RUNNING IN APT 


154 
15 
15 
15 
15 
15 
15 
15 
15 
15 
15 
15 
15 
154 
1 


CON 
:iYES, SKIP TYPE OUT 


SRRFLSRRREREREER 
PUSRRSRRERUNE CSS 


004767 
126726 


(RO) +,-(SP) 
4$ 

(SP) + 
(SP)+,RO 
#2, (SP) 
#HT , (SP) 
ACRLF , (SP) 
5$ 


(SP) + 


$CHARCNT 
2$ 


PC, S$TYPEC 
SFILLC,(SP)+ 


PUSH CHARACTER TO * TYPED ONTO STACK 
7:BR IF IT ISN'T THE TERMINATOR 
selF a POP IT OFF THE STACK 


ORE RO 
; SADJUST RETURN PC 
URN 
BRANCH IF <HT> 
; BRANCH IF NOT <CRLF> 


7zPOP <CR><LF> EQUIV 
32 TYPE A CR AND LF 


CLEAR CHARACTER COUNT 
SIGET NEXT CHARACTER 
:2:GO TYPE THIS CHARACTER 
IS IT TIME FOR FILLER CHARS. ? 
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TYPE ROUTINE 


CJKDB=8 DCF11=AA CPU_DIAG. 
CJKDBB.P11 19=JUN=79 10:52 


001350 


SEQ 0329 


a 


g 


oNnNN 
MALO 


000114 
000001 


000032 
000072 


000040 
000014 
000007 


160762 


000002 
000015 


000014 
000012 


000052 


160750 
000002 


000002 


sHORIZONTAL TAB 


8$: 
9$: 


BR 
$TYPEC: 
BP 


1$: 


INCB 
SCHARCNT : . WORD 


2$ 
$NULL ,- (SP) 
1(SP) 

6$ 
PC,$TYPEC 
$SCHARCNT 
7$ 
PROCESSOR 
#" (SP) 
PC,$TYPEC 
#7 ,SCHARCNT 
9$ 

(SP) + 

2$ 

a$TPS 
$TYPEC 
2(SP) ,a$TPB 
ACR,2(SP) 
1$ 

ALF ,2(SP) 
$TYPEX 
(PC) + 


321F NO GO GET NEXT C 
+ éGET # OF FILLER CHARS. “NEEDED 
sAND THE NULL CHAR, 
; DOES A NULL NEED TO BE TYPED? 
F NO=-GO POP THE NULL OFF OF STACK 
7:60 TYPE A NULL 
3:D0 aed COUNT AS A COUNT 


:sREPLACE TAB WITH SPACE 
:-TYPE A SPACE 

; sBRANCH IF NOT AT 

:2:TAB STOP 

7:POP SPACE OFF STACK 

33GET NEXT CHARACTER 

7zWAIT UNTIL PRINTER IS READY 


3;sLOAD CHAR TO BE TYPED INTO DATA REG. 
221S CHARACTER A CARRIAGE RETURN? 

; sBRANCH IF NO 

4945 as CHARACTER COUNT 


X 
2i1S CHARACTER A LINE FEED? 
CH_IF YES 


::COUNT THE CHARACTER 
: CHARACTER COUNT STORAGE 


$TYPEX: RTS 


$NULL: . 0 
$FILLS: . 2 
SFILLC: 1 
STPFLG: . 


3:CONTAINS NULL CHARACTER FOR FILLS 
:sCONTAINS # OF FILLER Ape gers REQUIRED 
23 INSERT FILL CHARS. AFTER A ‘LINE FEED"’ 

0 ;* "TERMINAL AVATLABLE’” FLAG (BIT<07>=0=YES) 
$QUES: .ASCII *'?"' QUESTION MARK 
$LF: wey <12> 3 sLINEFEED 


-EVE 
-SBTTL APT COMMUNICATIONS ROUTINE 
SIS IISISISISISIOI IIIS IIIOI I IUIOIIISIOIIIOIIOIIIOISIOIOIOIOIIOIOIDIOIOIOIOIOIOIOIOIOIOIOII OID IOI SISO IOII ICIS IDI it 
000236 : VB #1,$FFLG 33TO REPORT FATAL ERROR 
000226 $ tee 32TO TYPE A MESSAGE 
000220 #1, $FFLG 3;TO ONLY REPORT FATAL ERROR 
RO,-(SP) 77PUSH RO ON are 
R1,~(SP) 3zPUSH R1_ON STA 
$MFLG 4 eB TYPE A MESSAGE? 


NO 
; ;OPERAT ING UNDER APT? 
NOT: BR 


== 
—_ 
oO 
nN 
WI & 
ONO 


116740 
116731 


5$ 
CaP TeNy SEA 
- Spipancmnentd- 3: SHOULD SPOOL MESSAGES? 


MMU 


non 
WO & 
S85 


a4 (SP) ,RO 
#2,4(SP) 
SMSGT YPE 


IGET MESSAGE ADDR. 
TURN ADDR, 


000004 ;BUMP RE 
73SEE IF DONE W/ LAST XMISSION? 


SRLSASNS 
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116676 


4 
Ge & 
23 


116666 
116662 
000004 116636 


000004 000016 3$: 
000002 000004 
116312 


177332 


000062 
116614 
116566 
000004 116560 
000002 000004 
116544 
00002 
000013 
000006 


5 
5 
55 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 


$MFLG: 
$LFLG: 
SFFLG: 


19=JUN=79 
T COMMUNICATIONS ROUTINE 


1$ 
RO, $MSGAD 
(RO) + 
2$ 
$MSGAD ,RO 
RO 


RO, $MSGLGT 
—. 


SFFLG 
12$ 
SENV 

12$ 
SMSGTYPE 
11$ 


a4 (SP) ,SFATAI 
#2,4(SP) 
SMSGTYPE 
SFFLG 

$SLFLG 

SMF 


LG 
(SP)+,R1 
(SP)+,RO 
PC 
0 
0 
0 


G 10 
11: - PAGE 330 
SEQ 0330 


IF NOT: WAIT 
PUT ADDR IN MAILBOX 
::FIND END OF MESSAGE 


;;SUB START OF MESSAGE 

:2:GET MESSAGE LNGTH IN WORDS 
3sPUT LENGTH IN MAILBOX 
7;TELL APT TO TAKE MSG. 


::PUT MSG ADDR IN JSR LINKAGE 
-BUMP RETURN ADDRESS , 

PUSH 199776 ON STACK 

*:CALL TYPE MACRO 


se tors REPORT FATAL ERROR? 

: | RUNNING UNDER APT? 

2 ¢F INISHED LAST MESSAGE? 
NOT: WAIT 


3] 

GET ERROR # 
;BUMP RETURN ADDR. 

Sc TELL abt TO TAKE ERROR 
3zCLEAR FATAL FLAG 
3:CLEAR LOG FLAG 
7zCLEAR MESSAGE FLAG 
33POP STACK INTO R1 
+ sPOP STACK INTO RO 


RETURN 
; :MESSG. FLAG 
:LOG FLAG 
7:FATAL FLAG 


40 
-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


FARRER KER KERR KERR ERE REE RE KERR KERR EEE EEE ERE EER ERE ERE ER © 


:*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 


:*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
:*NUMBER IS POSITIVE OR gi gly A SPACE OR A MINUS SIGN WILL BE TYPED 
;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
: #REPLACED WITH SPACES. 
** 4 

MOV NUM, = (SP) ;;PUT_THE BINARY NUMBER ON THE STACK 
3:GO TO THE ROUTINE 


$TYPDS: 
RO,-(SP) 
R1,-(SP) 
R2,-(SP) 
R3,-(SP) 
R5,~-(SP) 


: ¢PUSH RO ON STACK 


4 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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012746 020200 #20200,=(SP) 2eSET BLANK ne My AND SIGN 
o eGR? 000020 Maida E T NUMBER 


RS 
000055 000001 #'=,1(SP) 
1$: C 0 


R 
061776 MO #$DBLK,R3 
600040 a (R3) + 


: 2 
061766 ~  $DTBL(RO),R1 ; 
: R1,R5 ee saan ys BCD DIGIT 


77BR I 
32 INCREASE THE BCD DIGIT BY 1 


:zADD BACK THE CONSTANT 
:-CHECK IF BCD DIGIT=0 
:-FALL THROUGH IF 0 

4 | te LEADING 0°S? 


32MSD? 


6$ ;;BR IF NO 
00001 177777 MOVB P 7 YES--SET THE SIGN 
0 6 #'°0,R2 72MAKE THE BCD DIGIT ASCII 
2 ¢MAKE IT A SPACE IF NOT ALREADY A DIG 
32PUT THIS CHARACTER IN THE OUTPUT BUF 

+: JUST INCREMENT ING 
izCHECK THE TABLE INDEX 
3:60 DO Bia DIGIT 


IT 
FER 


; ASCII 
‘ioe IFW LSD THE FIRST NON-ZERO? 


9$ NO 
177777 177776 =1(SP),-2(R3) 3 ;YES==SET_THE SIGN FOR TYPING 
9$: (R3) :SET THE TERMINATOR 
(SP) +,R5 ::POP STACK INTO R5 
(SP) +_.R3 ::POP STACK INTO R3 
(SP)+.R2 ::POP STACK INTO R2 
(SP) +.R1 ::POP STACK INTO R1 
(SP) +,RO ::POP STACK INTO RO 
061776 $DBLK ::NOW TYPE THE NUMBER 
000002 000004 mov 3(SP) ,4(SP) T:ADJUST THE STACK 


(SP)+, (SP) 
; RETURN TO USER 


Ahab Ab AL AL AR AR AR AR AR A AR Ab Ab Ah ah Ab ah ah dh Ah Ah Ad dh ak ad ad ak Al 
wi VMVviw Ww Ww 


SEBBSBSy 
SSSSRESTE 


$DTBL: 


$DBLK: .BLK & 
» SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


PERAK RRR ERR EER EERE ERE EEE 
:*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 

:*OCTAL (ASCII) NUMBER AND TYPE IT. 
: #$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


7 *CAL 


SRoRancss 


Se 


1 
3 
1 
1 
1 
4 
1 
1 
1 
1 
1 
1 
1 
: 
; 
7 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
: 
; 
: 
1 
; 
7 
1 
1 
1 
; 
1 
1 
1 
1 
‘ 
} 
7 
: 


RESTARTS SS RAG 
Ww 


oa 
— 
Oo 
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000000 
000001 
000207 
000002 
000001 


000006 
000005 


000145 


000006 
000132 
000125 
000012 


000076 
177770 
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000211 


000171 
000165 
000154 


BINARY TO OCTAL (ASCII) AND TYPE 


NUM, =(SP) 


-BYTE MM 


; *$TYPOS OR $TYPOC 


CALL: 
MOV NUM ,=(SP) 
TYPON 


* * 


oe We ee ee 


332 


OUT 
6 FOR NUMBER OF DIGITS TO TYPE 


321=TYPE LEADING ZEROS 
320=SUPPRESS LEADING ZEROS 


: «$TYPON==--ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 


: ¢NUMBER TO BE TYPED 
7sCALL FOR TYPEOUT 


career HERE FOR TYPEOUT OF A 16 BIT NUMBER 


NUM, =-(SP) 


@(SP) ,~(SP) 
1(SP) ,SOFILL 
7 


; NUMBER TO BE TYPED 
3:CALL FOR TYPEOUT 


:sPICKUP THE MODE 

;sLOAD ZERO FILL SWITCH 

; sNUMBER OF DIGITS TO TYPE 
: ADJUST RETURN ADDRESS 


cee THE ZERO FILL SWITCH 
SET FOR SIX(6) DIGITS 
:3SET ys ITERATION COUNT 


VE _R5 
SIGET THE NUMBER OF DIGITS TO TYPE 


+ ¢ SUBTRACT IT FOR MAX. ALLOWED 
SAVE _IT FOR USE 
::GET THE ZERO FILL SWITCH 
; INPUT NUMBER 


+ ¢ROTATE MSB INTO ‘'C’' 
DO MSB 
::FORM THIS DIGIT 


::GET LSB OF THIS DIGIT 
fe A THIS DIGIT? 


F NO 
23GET OF JUNK 
T FOR 0 


DON T_ SUPPRESS ANYMORE 0°S 

2 sMAKE THIS DIGIT ASCII 
;MAKE ASCII IF NOT ALREADY 

::SAVE FOR TYPING 

2260 be 3 was DIGIT 


ee 


::BR IF MORE TO DO 


SEQ 0332 
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;;BR IF DONE 
: + INSURE LAST DIGIT ISN'T A BLANK 
0 DO a * ee DIGIT 


sé ORE R3 
000002 000004 3zSET THE STACK FOR RETURNING 


7 sRETURN 
8$: ° 3-STORAGE FOR ASCII DIGIT 
. :- TERMINATOR FOR TYPE ROUTINE 
SOCNT: .BYTE :-OCTAL DIGIT COUNTER 
SOFILL: . 3-ZERO FILL SWITCH 
090000 SOMODE: .WORD 0 ;=NUMBER OF DIGITS TO TYPE 
-SBTTL TRAP DECODER 


CRIA IUIOI IID IUIDISISIOIIOIOIOIOISIOIUIOIOIIOIOIOIOI OOOO II TOT I TOT TI OTT TTF ESI ITI RI EEE 
:*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘'TRAP’’ INSTRUCTION 

:*AND_USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 

:*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 

:*GO TO THAT ROUTINE. 


STRAP: RO,-(SP) 3-SAVE_RO 
000002 MO 2 2GET TRAP ADDRESS 
)” KUP BY 2 


:3GET RIGHT BYTE OF TRAP 
RO sPOSITION FOR INDEXING 
062270 + alae sat Sr INDEX TO TABLE 


::G0 TO ROUTINE 


3zTHIS IS USE TO HANDLE THE ‘'GETPRI** MACRO 


$TRAP2: MOV (SP) ,=(SP) 7zMOVE THE PC DOWN 
000004 000002 MOV 4(SP) ,2(SP) :sMOVE THE PSW DOWN 
RTI :sRESTORE THE PSW 


-SBTTL TRAP TABLE 


s*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
:*BY THE ‘'TRAP** INSTRUCTION. 


: ROUT INE 


$TRPAD: .WORD $TRAP2 

$ 32 CALL=TYPE TTY TYPEOUT ROUTINE 
;sCALL=TYPOC TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
::CALL=TYPOS TYPE OCTAL NUMBER (NO LEADING ZEROS) 
:;CALL=TYPON TYPE OCTAL NUMBER (AS PER LAST CALL) 
$TYPDS ;;CALL=TYPDS TYPE DECIMAL NUMBER (WITH SIGN) 


~~  e es 
N 
ed ed ed ee ee 


SOONAUARW 


177777 PASSPT: =-1 
000001 - END 
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CJKDBB.P11 19=JUN=79 10:52 SEQ 0334 
& 026054 AMTYP3= 000000 BRC1 003342 BUFF = 001000 DNMB3B 011454 
ABASE = 000000 AMTYP4= 000000 BRC2 003352 CC = 177776 DNMB3C 011472 
ACDW1 = 000000 APASS = 000000 BRC3 003362 CCERR 026020 DNMB3D 011510 
ACDW2 = 000000 APRIOR= 000000 BREOP 060406 025256 DNMB3E 011520 
ACPUOP= 000000 APTCSU= 000040 BRH 025262 cC2 025722 D A 011710 
ADC] 020374 APTENV= 000001 BRMFPD 027074 Cc3 025706 011720 
ADC2 020404 APTSIZ= 000200 BRN1 003222 CLRCD 025704 DNMB4C 011736 
ADCS 020424 APTSPO= 000100 BRN2 003232 CLR1 017776 DNMB4D 011746 
C4 AROUN 25252 BRN3 003242 CMP 020640 DNMB4E 011756 
ADCS 020452 AROUND 041676 BRTAB 027170 CMP2 029650 DNMB4F 011772 
DwWO = ASL1 021710 BRV1 003272 CMP3 020672 DNMO3A 010130 
ADDW1 = 000000 ASL2 021720 BRV2 003302 CMP4 020702 010140 
10= ASL3 021736 BRV3 003312 CMP5 020726 DNMO3SC 010150 
ADDW11= Q00000 ASL4 021746 BRZ1 003152 CMP6 020736 010002 
ADDW12= O0CO00 ASLS 021762 BRZ2 003162 CMP7 020756 DNMIA 011114 
ADDW13= 000000 ASL6 021772 BRZ3 003172 COM1 021016 DNMIB «011124 
ADDW14= 000000 ASL7 022016 BR1 027464 ONT 025312 D 010016 
ADDW15= 000000 ASR1 02206 BR10 027700 CONTIN 060714 DNM2ZA 8011172 
ADDW2 = 000000 ASR2 022070 BR11 030004 025736 011202 
ADDW3 = 000000 ASR3 022112 BR12 030052 CON2 026030 DNM2C 86011210 
~ ASR4 022122 BR13 030120 CORH 037542 DNM2D 011220 
= ASR5 022136 BR14 030166 042140 D 010034 
ADDW6 = 000000 ASR6 022146 BR15 264 CPUTYP 041524 DNM4 010056 
ADDW7 = ASR7 022176 BR16 030304 C = 000015 DNM4A 8011602 
ADDW8 = 000000 ASTART 042402 BR17 030324 CRLF = 000200 011612 
ADDW9 = ASWREG= 000000 2 027512 CTRAP 037520 D 011626 
ADD1 020210 ATESTN= 000000 BR20 030344 DAERR 025514 DNMSA 012052 
ADD2 020220 ATRAP 037502 BR21 030364 DBE 041340 DNMSB (01206. 
ADD3 0234 AUNIT = 00 BR22 030404 DBE1 41362 DNMSC §=©012100 
ADD4 020244 AUSWR = 00 BR23 030424 DBE2 04 DNM6A 8012160 
ADDS 020262 AUTO1 037610 3 534 DBE3 041402 DNM6B = 012770 
020272 AVECT1= 000000 BR33 030474 DBE4 041422 DNM6C 
ADD7 2 AVECT2= 00 BR34 0506 DBES 041440 DNM7A = 012270 
ADD8 020314 BELL = 000240 BR35 030520 DEC 017636 DNM7B 
34 BIC 017340 BR36 030532 DEC2 64 DNM7C = 012316 
ADEVCT= 000000 BIC2 017350 BR37 030554 DEC3 017662 DOPB2A 010542 
= BIC3 017366 4 027560 DEC4 017672 DOPB2B 010620 
AENV = BIS1 017430 BR40 030566 DECS 017706 DOPOA 007544 
= BIS2 017440 BR41 030600 DEC6 017716 DOPOB 38 007570 
AFATAL= 000000 BIS3 17460 BR45 032126 DEC7 017740 DOPOC 007610 
Vs BITCHK 025442 BR46 032674 DISPLA 042214 DOPOD 
AMADR2= 000000 BITCLR 025370 BR46A 032704 DISPRE 000174 DOPO3SA 007716 
= BITCON 025524 BR47 033464 DL11W 66 DOP038 7726 
AMADR4= 000000 BITSET 025406 BR5 027604 DL11W1 037664 DOP1 010354 
AMAMS1= 000000 IT] 017250 BR51 034232 DNMBOA 011036 DOP2 04 
AMAMS2= 000000 BIT2 01726 BR51A 034242 DNMB0B 011046 DOP4 013772 
AMAMS3= 000000 BII3 017276 BR6 027630 DNMB2A 011274 DOPS 014056 
= 000000 BRA1 001074 BR? 027654 D 011304 DTRAP1 037540 
AMSGAD= 000000 BRA2 001104 BR70 037220 DNMB2C 011320 DUMMY = 
AMSGLG= 000000 BRAS 001116 BR71 040150 DNMB2D 011334 END1 027160 
AMSGTY= 000000 BRA4 001124 BICON 025600 DNMB2E 011344 ENT176 046614 
AMTYP1= 000000 BRAS 001134 BTERR 025564 DNMB2F 011362 ENTS1 044154 
AMTYP2= 000000 BRCT 025310 BTRAP 037556 DNMBSA 011444 ER 025274 
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ERRNM = 000442 022606 040172 
F = 000063 M4B 0 or Se 


SEQ 0335 


006066 
016530 i 0225 006076 
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002544 034144 015224 025130 
15 02 


SEQ 0336 


0 
01 
01 
01 
01 
01 
015 
01 
01 
01 
00 
026 
02 


SXTO 022244 
025776 004742 SxT1 022254 
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CJKDBB.P11 19=JUN=79 10:52 SEQ 0337 


041672 TST232 052274 044100 o1ssse 


177564 
037210 
TRAPA = 000077 
TRAPB 037620 TST231 052176 044042 
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002554 036112 005320 041526 
0 BR 02 


0 
001202 036042 005236 022416 
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SSWREG 000322 $TPS 042222 000304 
STESTN 000304 0 
STN == 000413 


STPB 042220 
STPCNT 042161 
STPFLG 061307 $TSTM 000334 $TYPOC 062032 


- ABS. 062306 000 


ERRORS DETECTED: 0O 
MULE : CJKDBB ,MULE : aot. SEQ/SOL/NL : TOC=CJKDBB.P11 
: 4 SECONDS 


CORE USED: 27K (53 PAGES) 


$USWR 
$x = 


062046 


03 
041626 


$XX 


. $x 


177666 
000665 


000330 


SEQ 0339 





